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ABSTRACT: 


The recent attainment and continuing development of 
personally accessible computer facilities have opened 
another chapter in the use of machines by man. A number 
of current research efforts, including Project MAC at 
M.I.T., are designing new conceptual systems to adapt 
the emerging technology to a wide range of human activity. 
Activities relating to management are the concern of a 
trial system at Project MAC called OPS-1. The OPS-1 
system and the experiment that launched it are described 
in this manual. 
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PREFACE... 


tible eine euhae tae: ‘Gierarion,. suche as M. I, T. 's “crs [8]. It die the 


product of an experiment which I conducted during the Spring of 1964 with 


a eraduite research seminar (15.599) ° at the M.1. t. “Stoan School of Management . 


There were eleven students in the seminarc# ‘Several of the students 
had no prior experience with crss, yet they were , using it successfully 
within, the first week of the term. 


At the initial meeting of the seminar, we reviewed recent progress in 
the development. of. personally accessible. computer systems, of which CTSS 
is an early.form, We discusaed the outlook for management, including 
applications to simulation methodology, data analysis, decision making, 
and the design of on-line systems [1, 3-7, 9-12]. Our theme was: much 


ean be done; present technology is already more ‘than adequate; there is a 


common thread running through many of the possibilities; the greatest 
need is for basic thinkihg and a simple, flexible appraach;, let's get 
started. on a framework that will adapt and take Form as it is applied. 


_ During the second meeting of the seminar, I sketched in broad outline 


. what later developed into the OPS- 1 system. Previous use of a very pre- 


. liminary implementation of the system led me to believe that the OPS. con- 


cept had potential application to a variety of management functions. The 
OPS approach appeared to provide great power and versatility, while ; 
requiring minimal systems programming effort and almost no arbitrary con- 
ventions. From the pedagogical point of view, it offered the erudent a 


ready opportunity to be original ahd self- “expressive, ‘dnd gave him a little 


guidance to bree him on his way. 


The exper imental plan \ was to have the seminar group program a 


generally acceptable version of the OPS system as a common project during 


*John Brach, Gordon Everest, Malcolm Jones, George Klein, James 
Linderman, Richard Mezger, David Ness, Daniel Thornhill, “Mayer Wantman, 
Robert Welsh, and Stephen Whitelaw.” 
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the first part of the semester, and.then‘spend the remainder of the term 
applying it to individual projects. We did not expect by this plan to 


produce any revolutions in management aystems: i ee but we did hope 
to uncover some “central ‘issues “and achieve some Hesie. “gnderstanding: a 
i » TiMoae dooe .Anmidetotgu untunda-a Heiss 
hope that was ‘not ‘in wala. 
G se ETI tam LORS po Ge ares 


ret ay? nT : i Roe? 
ak 


he experiment. procesdat as. eee In ada ce: bring. up Bikece, 
eounde to a common level, students vith pryee CTSS experience were 


patted ‘with | students more ‘tami liar with ‘the. "time sharing system. “Bach 


: nitie ania k roc 2) YE BE ar oS 


team was “assigned to. program one or ‘two ‘general-purpose operators or ors 


subroutines (described in Chapter III), ‘using “either “the FAP ‘or FORTRAN 

language... Avstandard procedure was est abl i shed ‘for “tol bdct frig “and Séonso- 
lidating information ‘on the system ‘as “fb ‘grew. | “Ths Gomhunfeatiien ‘proce- 
dure ; ‘based: mee igre hy ‘on the MEMO ‘command Sof <CTSS)> bed anc anans Boe! 


+ myo 
Poot ee pcp. ge Pek ea gehen 
4 L2G ee ci if Sees 


the present: marival. 2 - cis: tek, aegen bend gie moa de 


“Some students came to “the seminar meeting ‘the week after ‘che assignnents 


Were made with completed programs. “Host ‘cate, “netesd,: with quest ions “and 
suggestions! “How oat ‘thé “system do such aud “such”; “Would” it not Be 

borer gris wepidd of38ed oi « Paya 
better ‘to do ‘it this ‘other way?) ‘aad” 50 on. Sane 


BL peer a oe } Fs BOR FG PES {eer ae Jufid BWOWEIE nD 2 Re 


One possibility would have been to Sneoursge suestionita and dissent 
‘at ‘thits stage, ‘with the risk of the seminar * “s spending the beteer part of 


the’ ‘semiester eatane les in’ endless ‘considerations “of 1 ‘system ‘design. “Another 
s rag) 3i 565 trameid Cnt i a 
alternative, the one we ‘chose, “was eG have a subgroup of Ene seminar* go 


into intensive deliberations, taking “full account Ge points ‘made in the 


seminar méetings, ‘anid energe with ‘final ‘specifications | for. a firet- ‘phase 
feel; serbegeeaceaiq eogdaye fami iar noo ual pog 


eee eg Pideia 
system. 
‘ came festa er eas Preag A goad iQ 


What steered 3 us to, she, nesond alternative s was the] baling, chat.» many... 


C queer ioKe of systems design, such as the need. for: list. structuring,.would, 


be better posed and answered a sposteriors; or after having had some — 


ta Fadprompus 


operating ‘experience, ‘than a priori i and in vacuo. We felt that adoption 


retig’ aire irae 


of a straightforward OPS-1 would be ‘in the spirit of the ‘seminar, and could, 
as a by-product, provide guidelines for subsequent construction of a more. 


SUES BR. ee ser 
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sophisticated system. Simplicity and expediency were our watchwords for 


the time being. 


The specifications that resulted from the meetings of the subgroup 
found surprising acceptance from the rest of the seminar the following 
week. Miraculously, the main objections that had been raised were all 
resolved by the modified system, and certain new features appeared as 


unexpected bonuses. 


The OPS-1 system was programmed within the next two weeks to a state 
which allowed the individual projects to get underway. Except for some 
minor improvements, made later, the system was then (March 18) as it is 


now and as it is described in Chapters I, II, and III of this manual. 


Chapter 1 defines OPS-1 and specifies its central components. Chapter 
II explains how to use and extend the system. Chapter III sets down the 
standard operators that were programmed by the students during the first 


weeks of the semester. 


Later chapters present some of the individual projects. “In Chapter 
IV, David Ness gives an extension of OPS-1 that incorporates several CTSS 
supervisory commands, and thus provides the facility for the OPS system to 


modify itself and its storage map. 
/ 
In Chapter V, James Linderman extends OPS-1 in the opposite direction 


to obtain a first approximation to a "live" on-line programming facility. 


He calls his system OPTRAN. 


In Chapter VI, Robert Welsh details an adaptation of OPS-1 to provide 
an on-line simulation capability which he refers to as OPSIM. 


Additional chapters report on applications to management areas, inclu- 
ding an automated stock exchange, an on-line project scheduler, a national 
credit exchange, a mechanized system for accounting and budgeting, an on- 
line statistical processor, and a simulation of activities on the floor of 


a savings bank. 


The manual concludes with some discussion of how the OPS system might 
be improved, together with a description of some specific modifications that 


have already been programmed and tested. 


Martin Greenberger 


A IASI Sa cast gat tap and ya 2 RU ARN BRT 
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Note 


In order to keep this manual down to manageable size, reports on the 


following student projects have not been included. 
1. A National Credit Exchange, by Malcolm Jones 
2. Model Building, by George Klein 


3. TELSIM--The Simulation of a Banking Floor Using OPS, by 
Richard Mezger 


4. Modifications to the OPS System, by Daniel Thernhill 


The omission of these chapters does not reflect on their quality in 


any way. 


Also omitted from all chapters are program listings and detailed 


operational descriptions. 
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~ ANTROPUCTION ose ee 
Leigh Oh GOrhig Bein ik 
SE Pe SS 4 
System Concepts 
in’ setting out ‘to ‘design ‘the on-line ‘ayatan. we were ‘influenced by _ 
certain’ basic. ‘concepts ‘that ‘gedmed important to ‘us ae the tine. specifi 
pauy end al sayvis y 


cally, OPS-1 has the following features. Our experience with OPS-1 has_ . 
reaffirmed for us the importance of these faatiited and we regard most of: 
them.as essential to fhe success of any, gimblaryonsdine.aystems.:.. 


Simplicity -. . SDN Lay ERE epateohes SY ie ato SREY og tae 

The’ ‘system ‘ts simpie™ to “use and. simple to. understand, “even by the - 
relatively ‘uninftiated. °Gomp licat fons can extract A high price ‘from system 
resiliency, and they were avoided wherever possible. The user may ‘add ; 
his own complexity as the needs of his application require, but dermakly:* 
this will not complicate the intergal struchune of the system iteelfs and 
it will got reduce overall flexthtbhtye no. 5 tous 


Versatility: - Meas oh or Gaeta ori gu 
Unnecessary rules, conventions, and formats aleo were avoided. Thus 
the user is not forced into thinking about his problem in ‘artifictal ‘dy: 
unnatural terms. He hag ample coom tq express hia problem and himself, 
and be hag the fregdom.o9 he creative yc. 


Gengrality {90000 0 fat 


" Awide range of applications = te possible, ‘from the structuring of 


simulation ‘models, decision ‘prodedures., “problem. solvers,’ ‘and “information 


processes, to the design of programming systems and of-liné. 
including _ CTSS itself. | This. generality is. particularly Significant in 
that At fqcilitates the construction of hybrid systems. which, Eainshaal 


Serpe 
or more kinds of elemants: for example, a real-time traffic. controller ., 


with simulation elements and data analyzers; an on-line Brey amine. system 


with debugging aides and an instant-execution feature; a Sob=shop” 


a decision system with: simbation;: inforbentdd prdceséing;” felt cage 


4 eke Teer a goes yet Vari am ai batgbuerdde sd is see AC aka Tt 
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solving elements; or an informatién utility: with all of these elements. 
It is a safe wager that man-machine organizations of the future will be 
large hybrid systems of this general character. 

Individuélity 


In customary use, the system is expanded by the user toa form that 


matches ‘the specific ‘requirements of his application. The basic aystem, = 


POR me bogeass 


performs 1 like a a catalyst, in this process. | 


andabijity and . -E me Le aith: 
Typically; the expansion of the‘ syste fé°Hy small ‘inéreménts which 
extend its usefulness, but not its structural complexity. There is:no::' 
theoretical limit to how far the system can, be ooepgnded without | its, 


getting bogged down. Expansion may be wradual and continual over, an 
indefinite period of time. 


A Ae Sl 


Modularity : oy eee heey iat ~ Fo pire wis @& wiegesl 
-< Fhe elements of the system are 1ike ‘pltiggabie ’ ‘parts, Except for the _ 


few main components, each part can bé ‘anp fdgged oithddt disrupting or 
affecting any other part. Most of the elements are called operators..." 


They do not call on one another directly, thus ensuring separation of function. 
eean es PR PEESAPAPED Coit Wine age Coogi er TTR ,asiG 2 WASVIG , BOLI VIRAR ie 


I : te. i eudder pido poe oguudnige ognd begrcd goa af 


guises 


An éperator ‘cai be executed as it is veterGicéd. ‘This feature —” 
facilitates the editing, probing, and- testing of dimdtatton ideté'ana °™" 
information procedures while they are under construction. With the help? 
of system operators, a model or procedure ean be. Morking 4 almost _48,sgon 


as it has a a meaningful structure, and well before At is in final form, 


adEMCG 4 


Condit 


1 Magee ge 


As elements of the system are referenced arid ‘examined in ‘compound 
Eis Ot iat 


BRErerae She patterns: are witli cat ty wee mber ed" for posstbie addi- 
tion to the’ eyatCme ‘ ‘ peor Lea is wale In 3 


Graduated Gufdance . | oe eS os “ tedine giitent | 
Belpimde siesta tail pé faced: the user by the computer’ ate first ; but 


this guidance can be abbreviated as the user becomes more adept and sure-footed. 


new 
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SYSTEM DEFINITION 


’ Aofzemiaick sis 
The Streetere-ofORS-10 2 0 2 reat antsy 
The system hh a basic structure that 4 is easy to ‘visualize. 1 First, | 
there is a common body of information, called the’ data b base, ‘that ecun ine 
one section of cédpetey memery;: thea! theed £250 84 OF 418g 1¢ operators 
that range over the daca>base: (they abe weibeobkines EnAt GeP6 Witten 
originality? eleter’ dm: FAR! of FORTRAN Before: Bette. compaied Ihto-mathtae © 
Language); aud: fiaally,! chete'té 7a! ethereal michattt bie that! dllows the uset 
to ¢kecste ‘and Lomb guat: Sha Steere Speeatoes ith FLAkth1e combinat tons, 
the’ structuré OF the’ oyscen ‘is Ghee a schemitically in the diagram a 
below. The principal: coudonente of tus wyacta wilt: be "described briefty 


now; @d2 in #éme Getadd! ia! laces pagbartt ons add gomrt amouaig « 


Goan ant do gan A .tesuernss LO gts PES 
SAMMG ttiw es lisw ca .yateraqo foes val. Ledaive 
, 2 REN Logo 9 aasiverg aims Gln j 
RE ae is ff aul 8 SMIiYa i 


‘ ., sim aba one ‘seSotidary 

p' <eeorege ioe se yisterage *: 
Ate PSO. SSB ING ete! 
_| 


cen ioe pian ieee 


~ ee 


secondary 
storage 


§ ry 
storage 
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Data Base 


The data base is the information center of the OPS system. It 
contains information of joint relevance to any two OF- wee: sepexese: ss el! 
elements of the system. Its data may be arranged ag single Leccahe 


multi- ‘dimeneional arrays, or ligt “structures, 5 7 


fo vod mancva. EB a4 

The. first: part Se the fick base: is. assoeiated icesies beciets eystem:, 
itee. : The remainder is.added by the user) aesen ding: teithe.pecden of hie: 
application. .It becomes.a representation: pt the. informational. content: ox 
environment of his,.prohlem, :.¥For: s: simulation, model, -it:4 pi a:porttayal of: 
the procesa,,being modeled; for.@.real-time..cperegsions J&-46 Ba resomd.of | : 
the present state of the . system; and for. an , joformation processor, it is 
the bank of data that is being analyzed ‘and, manipulated. di 


3n sate oe EGG Sad wited say 
At the present time, the entire.dats base! igi loested within: commonp::.. 
storage in the primary memory of the computer. A map of the data base 
is associated with each operator, as well as with COMMAP, a service 
routine for operators. This provides the operators with the means for 
finding, moving, and modifying values within the data base. 


Conceptually, ‘these is no reason why the data base should not extend 
into the Secondary memory. of. the gouiputer . 2his can be done with the 
© present 4 OPS-+tesystem by the user's. formufiting and introducing the 
appropriate operators. An ideal system would “wake this extension aut oma- 


TF Ak 
Peni 


eheersys Wie “requiring” ay action or concern by the user. The Hata 
base would then be open-ended and there femena ce nds hsopeticat Limit to 
its size. : reahee : ‘ ‘sg eS : 


fasten Se et: ete ° [Reels come 
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Qperators RE OS ee EN Ce 

Operators are the functional. subroutines: of the OPS system, A. set 
of standard opscaters: comes: with the: syatem, aint provides the generei- 
purpose: services feguitid by moet «wékersi «The stentecd: operators are: 
described 4mi Chapter’ TiLi.c65 243 © ewoile ae oyeloutse ska re 

A user “putlds up the ope systen 3" ‘HE nih patticilar needs by Bes 
enlarging the set’ of standara ¢ operatdth. ° that te, He’ progranis and’ com 
piles his own operators, ulti: ‘x Lhig tig’ BUN ne’ FORTRAN’ or’ HAP, thtro- 
duces them to the system, and makes. Corresponding additions to the data 
_ base. The. precise procedure he Epllows aN ‘baking, these stepa, is spelled. 
dut.in i ad } sr Sy ag igs ee aaa eee 


be Gud | POs pte 


Avscbiated with each loperator dre’ a: husiiser| af: phreseicers that cise it 
specdficity. The user, if the simpje mo yde of operation, enters these 
paraineters from'his console at the quest of the comput dr. ‘Tn making 
its bequest, the computer | ‘assists tie user gen eee glide Unes 

sane fating the tunes -aeah ormats of [the parameters. a 


j 


toms a 


oF ' The operates, Baken. ‘together with théodat healers the: aie! syetes 
nee ‘etate- transition appelrance. “The Hata base répresents the s state bf 
“othe: byetem, and :the operators, operating on the'data. base, cause transi- 
tions to new states. In this analogy, the compoutd operator is a schedule 
of future transitions with a fixed ial aac ae bie dave 
duridg the Lifetime of the system. @ 


€ 


pases acento ne tte teat Senate tm or ain et 


Ory, and. keeps one 


wo _,OPS-1 stores Valls _simple operators in primary. a 
sideapaui operator thevesetsa: time. It holds the rest of the compound 
operators in secondary memory, and brings them in as needed. A preliminary 
improvement of OPS-1 also brings in the simple operators as needed. 

Ideally, compound operators could be used to schedule the dynamic allocation 


of simple operators by helping to anticipate when they will be required. 
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Compounding Operators SEO BTS 


Simple operators’ way: be strung together to: form a cempound: operator, 


or KOP,- and: the KOP may: be: assigned: an identification: numbersend: retained © - 
in list form as #: permanent addition to the system: ~The KOP dao represented: 
by an Mx3 array (with structure as shown in the diagram below)::plus tedi : <>. 


linear arrays for the. associated, parameters, These arrays are stored as 
part of the. data base, and may therefore be modified. by, operators, . That 


is, the operators can, modify, themselves, and, the ROP! s+. ; 


InIs: 


(LKOPY _ OP"s “pointers — pointers — (tipay °° reR"S 


gis, enrH alte tgih woah tae aggebe ila tcisie RIO 
- ne eras Operator’ “Integer Decimal 
Siow of Jogi tParametepdi -occ sq > Bapgmeters 
ital Eh? a ee Bes Weds curiae UL ovaumes cwisbreoee at gantatsyo 


1 

Petes 4 Lepigave: faat 

' 

| (Lipoid 
» Bs 2 


Ho SEY add oF uote escuh 
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Modes of Operation 
- The: OP8+1 system ie operated by the user fiom tis aa? At ‘any 


given time, he may, by his oie caavelguiah aoe _ one pe sik S sdeagea 


mode#., The modes are as. fear aks oe 
‘1. Simple cutia 1 | "execution of a simple operator (Lees, of 
, ti ORY. a 
oe Greate with execute! a creation of a * compound operator by, 


ee Qa tiie ete? OP to the KOP Itst. The 
. OP. 4s, exeepted: end. guide: lines are — 


meh OF 


printed, as 
3. Greate without execute;, same.as 2,: but without. execution of | 
ee OP, 


4. Compound execution Sylva geek, one gis 
with parameter entry: execution of ane or more OP's of a 
ee eee —., . ROR: ligt: deeb OP requests entry of 

its parameters from the: eemsole by 
printing guide lines, and stores 

——— parsmeters: ity: the: appropriate 

. Loostéena ofthe parameter lists. A 
carriage return at the console 

. (wibhone the entry of: any parameters) 
causes the, parameters previously 

stored in the lists to be used by the OP. 


5- . A na ok : elds Bye iy bp ee 

ee game as 4, but’ with each OP automatically 
using parameters already stored in °- 
the clad pTaeee . _ 

9 &B yeate!: | | Dae name as 3, but without guide lines... 


‘the tser is responsible for knowing — 
. the: -quebe¥ and: féithdt’ of the parameter s 
_ of all OP's in the KOP he, 19 creating. 


at 


he sits at the console, and not. to. pposran Hadi SeeaTRSENR OW} 
peaceduees |. By fi a 
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An Example | caidas yet ia sebodt 
.. Tp, illustrate how the OPS system might. be,.used in: a management: con- 
text, let. us. consider an oversimplified, examp).ep! - ¢ Weekly.,sales data for. < 
the last twelve months have been collected..and. turned. over. to Mel, a: new: 
employee in the marketing department. Mal has been requested fo Beve top 
a technique ‘for forecast ing cutie salebs He decides to “iP the exponen- 
Feet, = ae om (l-a)F,. > where en is the forecast of 
sales, in week ty. 8. “is the. actual: nena salen in week €, sin is the 
forecast. toi be: awe ie the nekt week, and a is the smoothing con- 
stant. Mal wants to see if there is a smoothing constant that generates 
forecasts close: to the actual weekly ga lee! We be thitke abott this 


problem in the framework of the OPS system, he ria daa the need for 


tial smoothing Bule, 


three basic Speratorst it eae panic ueers Satie 


Tere ‘ta 33 IB BG 


1s . Ate: Deoet Speratior that. reads date Eyre specific : area of the 
code a Sane ae Seles : 


tld ark ‘eiuciail exithankie: ‘eecaese that can add, subtract, or 
a -multipdy. any. ‘of thevariables in the data base. 


BO RL SERS 


Beck print operator that wit) write out the value of any variable 
tooo dm. the becca bade PNR. bs 


Mal decides to detéruine whechae the forecasts are good or bad as 
{én-into | his 


Mal could now write cheese: ehiee special operators, but he first 
aug 
glances at the Met 4 basic OP's in Chapter III of 


Sip bei it 


= ~fianua 1 and 


_ notes, that. ‘the. MODLEY: OP (0P15)"provides both the input and print functions 
hat hd desires. “etanctag® at. ‘Chapter V, he also notices that OPTRAN could 


be used to compute the forecasts. 


However, he wants to get some experience writing his own operator, so 


he decides to write a general arithmetic OP. This operator could be 

programmed in a number of ways, but he decides on the following approach. 
re Xo» X,; --- %, that can contain 
input variables, constants, intermediate results, or final results. The 


He defines several data registers X 


f eH 
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OP will have four parameters, all ftitdgerg.: The first parameter tells 
where to put the result, the second where to get the first operand, the 
third what the arithmetic operator is, — cae fourth where to get the 
second operatid. this might be stated as x =X, 6 , & where X x, 

and X, aré ‘data ‘régisters, and Ce ‘is cither addition, subtract on, multi- 


plication, | Or ‘dtviston. The corresponding parameter values” ‘are. i, j, n, and k. 


te, a 


Mal programs, pis OP in FORTRAN, eoapilen: it, adds it to ‘she system 
as oP21, and checks, At out using. mode 1. Now he starts to write-a 
compound OP. He, can do this in either mode 2 or 3. He eee use . 
First, he drtey toe opis! 8 to read is ‘the eonatent Ay ‘the eaneeant a, 

hy bere Fhq Fk PO Pee I ba . a 3 
the old forecast, Feo and the last week's sales, Si. Then, he writes 


four OP21's to calculate the forecast, F Finally, he adds an OP15 


t+1° 
Satisfied with his 9-line KOP (see page 1,17), Mal decideg.to save 

it for safe keeping on a Simulated tape. To do this he executeg,0P17 

in mode, Le. Now he is ready to return to the first line of one and 


to print out the result. 


execute it repeatedly in mode 4, using the new values of _ E. 2nd 8, 


Aftdx repeating this KOP -a few times; Mal-reatizes-that séié 
improvendats avd péeeible. First ; -he -uses -4-MOVE -OP - (OP16) t6. #eplace 
the old forecast; F hs with the new forecast ; FP rep ~at -the -bot@éilof the 
KOP. He ‘then diel @ Graal GP lee4 don Wacken ‘the -begtnming d#-the KOP. 
To mike: these changes he ‘reverts to mode “3; “After -a-fea mote ‘é¥eles 
through this new KOR, he realtzes that there ts -only one “OF (#8 OP15 
that reads in the attual sales $,) that requtres “a new paratieté# each time. 
Only this OP needs tole 4. All the other OP's have fixed “pardiéters and 
can be skecuted in ide 5. Mal therefore decttes “to “rut ti médé'5 and 
simply. use two MODEFY OP's. (OP15) to ‘switch between modes 4 and § at the 
appropriate times (see page 1.17). Now he can automatically cycle through 
the KOP several times for each trial value of the smoothing constant. New 
smoothing constants may be inserted using mode 1. 

This example could be extended to show how Mal might build up a more 
complex forecasting procedure with the help of the computer, but that would 
bring us beyond the purpose of the simple illustration that was intended. 
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“ : det ger th 
CE Db do ee PD Shay 
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iD 


yo maid 


OP15 eae | read constant 1 oa Radics 
ee ee a CUE 
iae4 Be ES Pres mene tie 3 mee F read for #1 recess F.. : 


OPIS pee ccncswahereeeteeess>weneecuccsacce read last spies 9 s. 
OP21 Sa cce cites dbeecledice shel Jo 6d Oba f° 
“OP21 i a aera erent rs Lan 
OPI o52s- step ede dine eek ose SSE S CRU ax s 
“S9p9i Jin BaBb adh eo sien owin tet HEE ‘Eongidt Pe 


* OPLT5 ids deacon iveadasie daciiavedd “Lose oe éut r 


Revi 


fess anen ramue eae aid “Sf Meainch 

QRLG <n nnn cece hope nee e n+ near dene oii change to ‘mode 4 

1 RIB ~-- sens gee seems oe nee eon n seater s mead last sakes 8... 
ARLE core nescence ene c cree so cere nee tes change to sade Mo ass 
QPEL qrtnpden tence nn nnn tegen rend eee Pe thee COMPS (dea) 

 QRBL ernw eran sore serr oreo reese ree ediesen sn! Compute, Glee): x EY 
OBGL wererrc ore ncr csc rese crn rme seinen = se COMPRES a BL: 


OP21L ENTE nee ene n ser re eg enna as. COMPUER Rap’ Lees Satid 
OPR15 PROT S ERS KT ETE Rew n we Ee mene, LYE : iqut. FE ‘eee leer ena 
ORL6..-n--rreernrenssane nc neanenrer dese n nso Ve Fig hOB, oo suo 


,OP13. ----see rence r nme erate err rnser- es bremnh: back to: OPkt i + 


Ded eRe att} AGME ILS tl ade. 
\ 
/ 
a“ 
7 
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Central Mechanism 


The diagram of the OPS-1 system on page 1.10 indicates the role that 
the central mechanism plays in OPS=1. It is the control center that ‘oe, acl 
switches the user to different parts of the ayeton. The MAINOP routine _ 
actcalls doce the euttening tReet OE EE eed 


mek Racyit 


At the beginning of each rare ene user sal emer to ) READOP and 


foie 


pen 1 OS BS DAYLE Ques a ae 


In all. “abd, the user. is Neterons via, PALO to the . OP specified 


estia ET? 
in his instructions. Except’ for modes 5 and 9, he can then communicate 


with that OP, or through that OP, with the data base, When the OP has 
a cea ans iea. ak hs hie bara a ena ean 


fie pene; oa 
In addition to ‘connect ing the’ user ts httob" RRABOP and’ PARAMS, ‘the | 
AGT atu 3 yo\bas ota9% SAE 
MAINOE routine ‘creates or “executes compound operators "kobe a and ‘cliecks. 
3 haiikorar PoE Ese, geet! javege boalkttueds 37 Lemans cant 
for eerane. - : 


COMMAP a5: a epceial pebiecidckeas oarige: Ssaesogeali an. OP. F046 og, 
commintcare with any apertt tes part. of the data base, 


ce epideg = yor tes BYON) eYrodeveno bruoow 3 


‘The, eboys rowtings.are, explained edi: detail athe: elias PABESs.... : 


fehipep eu i beet I os are fs a 


‘ cad ee ee ee a 
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MAINOP 


Purpose = 


daw 


The program “MAINOP MADTRN is the eiecutive rogra _for the OPS system. 
Pr cogram, £0 oO oe res i Sys nap Sd 


It has the enghiles Punet tons: 


rPlogtencs ‘ nyyit -inys ions 


eo ‘Asks what operator } you a, wight Eo execute next, eee 


2... Executes. the: operator: if: dn ae fOi goil gaoewth «2 giw SMABAT 
3. Creates a compound operator if you are lin 'odds'2,°3, or 9. 


4. Executes a ‘compound operator 4E you ate in’ modes’ &° or’ ‘3. = 


Suse £ QgieGer gel SJoeexs wenoigourdeti cin oss 


Operation | Ga aeees n ae, 
ake oa Rohe ~2E BG Ses iB fate. Ju) Sait deyowss > gM Died 


3 


To do these: £unct lena; ‘MAZHOP: makes: use iofsthe.: thmee: system: sub: 


routines CALLOP, READOP, ang PARAMS, It usge READOP to find out what 


operator you wish to. greate Ba oF execute. next. It uses CALLOP € to ETARBS A 
eet eree ECL LGLFe. Des tt Stes LS 12 92: 


fer control to ‘the specified operator. The operator is specified ‘by the are 


system variable MOP. It uses Guanes to read in eee for an 
operator if ‘the mide “ts ‘set’ to” 9. Soe ROMA BLESS ARERR Bites a eae 


aiiw orth Cae 


MAINOP creates Sompouna speretore. “(KOPS) = coreat ine a table. There 
is one“iine in‘ the tablé-for ea&ho sitiplé Operator? ? “eae itne eontains’ 
three pieces of information: (see page 1.13) 


1. The name of the simple operator--a two-digit integer. 


2. A pointer to the beginning of a list of integer parameters 
associated with the simple operator. 


3. A pointer to the beginning of a list of decimal parameters 
associated with the simple operator. 


To update the pointers, it makes use “of: two system variables, JIPR 
and JDPR. These are the number of integer parameters and the number of 


decimal parameters used by the simple operator. 


1.21 


At the present time, the OPS system does not accept a. compound 
operator that contains more than 100 simple operators. _ Also, this 
compound operator must not contain more than 200 decimah and 200 integer 
parameters. The OPS chécks to see.:that these limits” are not. exceeded, 


When MAINOP is executing a compound operator, at Aces not use 
READOP, but instead gets the operator from the KOP table. It uses the 
system variable LKOP to specify what line of the KOP table is to be 
executed next. If OPS is in mode 4, MAINOP will stop at ‘every line OF 
simple operator and ask for parameter values. 1f io. Parameters are typed 
in, the values “stored: in. the: ‘Parameter lists (TRE, yan DERY: will be used. 
However, if OPS 46: in mode ‘5; there is an aut dibatdc” featuré- that allows 
MAINOP to akip. ‘the: reading. of parameters and tnotead-tehe the values that 
are stored in the two parameter lists (IPR and DPR) » The two! system 
varialsles LIPR and LDPR. -point.to the-first -Anteges parameter and first 
decimal parameter, respectively, associated with the simple operator 
specified by LKOP. j 


In modes 4 and 5. it is possible.to automatically sequence through 
several operators by setting the system vartable JKOR-equal to the number 
of operators you wish to” execute automatically.” “FE SIROP “LE 8Et 6 99, 
igx uate OF 19, the 


the automatic sequence wil continue indefinitely 
terminate OP, is encountered. 


__MAINOP 


LKOP = 1 
LIPR = 1 
LDPR = 1 


_ MODE = 1 
ar Mek ‘SIPR =O Fe 
JDPR = QO: 


chy Ores 
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2) PRP a ROT ERE 21)” Bey ek lg 


rE 


LKOP = LKOP+1 


ee) 


Y 
= JKOP = JKOP-1 
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ge 
Purpose 
The function of READOP 18 to allow ‘the ¢ user to specify what action 
he wiches to: haive- oceur Treckt .. Lahde ca fyi fla 2S ee ie 


If MODE is 1, 2, or 3 READOP dues the FULIBIMAg! 
1. Prints current mode (MODE) And’ 140n@' (1ROP): 
2. Prints a line 49 the foineRN RMN, WHEE: 
EK = the next Sperate®: you With be: etter at you dba goitig to’ 
be in modes 1, 2, 3 (MOP); ot= the number of Te Hoce you 


' wibhote Katombe ed 1292 Jepeente 1 hedbs Ab? 8 Betore’ Jot 
_ again come back to, mgnuglogeration 4IKOR)*, . : 


Ko = thé metey be’ saute Le” fesiguiieeuon = sie! yt tated 
bs the above, to he. waged, & bre oo #2 a re eee 


XX = the fo uua esr alatee Gegi¥a‘tio * 
a. start execution in modes 4 or 5, 
b. insert an operator into a KOP in modes 2 or 3.** 
3. Reads in the operator. number (or JKOP), mode and line number. 
4. Echoes back numbers just read as a tranemission check. 
5. If MODE # 0, sets mode to new number. 


6. If LKOP # 0, sets new line number and also sets the new LIPR 
and LDPR pointers. 


*This jump (JKOP) can | be used in both mode 4 and 5. In mode 4, 
you will be asked for parameters by each operator with no opportunity to 
change modes until all operators within thia jump have been furnished 
parameters and executed. In mode 5, the stored parameters are used and 
again you can not stop the sequence until jump has been completed. 


*kIf you set the line equal to something less than where you are 
presently, you will be writing over the old KOP, and hence, lose the rela- 
tion to anything below the number you set. 
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7. Sets MOP or JKOP depending on whether new mode is 1, 2) 3, 9; 
or 4 and 5, respectively. 


8. Returns control to MAINOP. 

If MODE is, - or 5 READOP does the following: inGgian 
are Prints next opexacar in the KOP table,. the: mode; and: line number. 
The subsequent actions are the same as steps 2-8, previously deseribed;:, 


If mode is 9, READOP.. does. the followings Ac: © 5 03 CU! 


1. Prints a line of the. form XX-X KR: G05 seerte eo 
2. Reads in next operator, mode and. line.numbersai’ - 


The. subsequent actions. are the same ae ataps: ad —— described. 
fil 


‘TE any of. ‘the ‘three. ‘fields: tapceventedi by idk. Ped are; dade blank, 
or if a0 is typed, nochange: 18 imide to’ the’ systiin Wattablés® associated 
with those. fields, Thus, their, previous,valugg, are:ugede: This-feature 
is particularly useful in modes 4 and 5 tele Se. RS ‘theai: typing. 

a single carriage return provides a.eingle step-opervatiati cs 6 


ee | 
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oe 


PRINT: 


PRINT: MODE, LKOP NEXT OP, MODE, LKOP 


PRINT XX X XX 
READ: N, M, L 


12,3) 5 
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CALLOP .. 


oi eds A ete Me 


Purpose 
‘The purpose of the CALLOP routine is to transfer control to the OP . 
that the user has specified in READOP, or to the next OP in the KOP list. 


CALLOP also handles error returns from oP" as 


Operation 


CALLOP operates as follows: when called the. first time, the routine 
immediately branches to TIME]. First the transfer to TIME1, ids replaced 
so that this part of the process will be skipped in. subsequent ‘calls. 
Then we save the return to MAINOP and depress the console input level. 
Then the normal CALLOP is executed. Sant eS 


The normal CALLOP saves index register-1,-then-sets up the sense © 
indicator register so that FAP subroutines may deféct MODE (if they want mo 
to) using the SI. Then we create a transfer to: OP+G (MOR) -which will / 


contain a transfer to OP(MOP). Then this transfer is executed. 


At BRRET (return from a break e sienet) se re-depress- the console input 
level and go to RETRN. See 


At RETRN we store zero in JIPR, JDPR and JKOP. Then we test to see 
if we are in mode 1. If we are we “return ‘to MAINOP. If we are not in 
mode 1 we first decrement LKOP in anticipation of MAINOP incrementing it. 
Then we return to MAINOP. -RETRN may this be used to return to MAINOP 


without changing pointers (for example when an error occurs, see 2.60). 


CALLOP demands that all subroutines from OPOO to ‘OP99 be present. 
Of course we rarely will have all 100..0f the. subroutines in memory. In 
order to circumvent these difficulties we make use of the fact that the 
BSS loader will, if presented with several “definitions of one progran, 


simply accept the last. 
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SUBCAL FAP defiiee: atl” ‘subroutines from OPQ0 “to” OP99; If there is 
no other version of. a:-given qubrout ine loaded, ghea: CALLOP will actually 
call SUBCAL. : If’a° gubroitind has actually been} loaded ‘then this defini- 
tion will supersede the @eftnition in SUBCAL and ¢ that routine’ will be 
called instead. : Patines? aa 


Thus if we call ati Sperator which has not been defined we enter at 
OPXX. We begifoa: sequence:of operations which leads us to the message 
OP. AB IS NOT YET DEPENED and we return to MAINOP through RETRN (thus ‘not 


increment ing pointers}, 


There atte” two-MEeTos” im-CALLOP FAP. They are called TRANS and FIX. 
They operate “in such 4 way as to insert at location OP 100 transfers to 
subroutines mamed-OP00; OPO1,~. . . OP99, 


The macro CTSS simply is a convenient way of enabling one to get 
at the CTSS system subroutines, in this case, to write a line out on the 
typewriter (the > coemmand GRAS WRFLX). The other threw: macras: {REQU, 
TAB] and TAB2) simply | idefine all of the entry points to be equivalent to 
OPXX. 


For those wig’ wigne be. ‘writing FAP operator, ehky-may detect mode 


by testing thé sense *{#atcator! register. The cont ¢nt of, fl or for the 


various modes are as follows: 


Mode Left-Half......_. Right -Half 
: a 400 
2 57 “200 
3 67 100 
4 73 O40 
5 75 020. : 
9 “Oo 


ee 
Thus the command RNT 40 will execute the next instruction in sequence if 


we are not in mode 4 and will skip the next instruction if we are. 


CALLOP ENTRY 


First time 


WTEME F af 


‘Depress QUIT 
level-«~sane 
eturn as OPs. 


TT PR = Oe , 
JDPR,= 0 
SKoP*= 6° 


MODE: 2° - 
LKOP = LKOP=1. 


Back to ‘MAINOP 


‘Set entry. tof 
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Thereafter 
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-COMMAP 


Purpose 


The COMMAP routine is necessary for defining the data base, or 
data elements that are in COMMON storage. It i tsed by OP's 15 and’.16 
to locate individual data elements anywhere in the COMMON storage area. 


Operation 


COMMAP is written in FAP and makes use of a macro instruction 
called COMSET. The COMSET macro is a rather ctitiplex one. It performs 


the following functions: 
1. Each time it is expanded it increments-N by one. 


2. Each time it is ee the variable named is aeraces in 
common. <2 _ 


“3. ° “Mhe nitite, address of the vatiable bran a and 1,5;K Giwen- 

sion is placed ina table. 

The entry points TABLE and MAX are used by GET and PUT* to obtain 
access to the given line of commoh. Evbentidily the process is this. 
Given a common line number, we test against MAX to. see if we are beyond. . 
the range of common defined. If we pass this test, TABLE gives us the 
base address and dimension of the arr#y referenced. From this information 
we can compute the exact address of the céli tefetenced, We use MAD (and 
thus MADTRN).type indexing, and thus this informat ion is available for. . 
compatibility with MAD. (and MADDRN) programs. 


*See discussion on Service Routines, pg. 2,40. 
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We refer to common storage through "line numbers". The line numbers 


for system common are as follows: 


Name of Common 


Array Line’No. =. fea any Ea 

“KOP oe ae ale 
IPR. ples 
DPR 3 

+ JYPR Pires paneee - eee 
JDPR 5 
LKOP 6 it 
LIPR 7 

a5 MODE. 9. act i 2 ia 
NKOP 10 
JKOP 11 
MOP 12 
INDEX 13 


When the user defines some common storage for himself (using the procedure 
discussed under "Updating. of Common: Map'),.. this satan’ simply, fecenied. 
For example, if the user adds to the common’ above: os 


Se SE ae maT. EE) aC 2) 
: » COMMON: .. P,. xX, A... 


and*hodi fies COMMAP P by addinki 62 fee deo b se cueers 
7 * Coser P,0,0,0 | 
- SGEMBET X, 27,5526 
. COMSET, A,39,0,0 
then’? is tine 15, K fe line 16 and A 4#\1ine- 17¥ ‘Te refer: toe given:. 
cell within an array we simply'‘ad@ the indte@s.i: for! example to move: 
X(22,3,1) to P using OP 16 we would enter as arguments to the first printout 


€ 


("FROM LINE XX(XX,XX,XX) CAR RET. FOR PARAM") eee 
16 22 03 01 (Line 16, Cell 22,3,1) 


and to the second peiucout 


("TO LINE XX(XX,XX,XX)"etc.) 


& 
15 (or 15 00 00 00). 


po 
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‘PARAMS 


Purpose 

PARAMS is uuded only by the expettanced user“whn knows @xactly the 
number , meaning, and otder of parameters he wishes to enter into any OP. 
It deletes the printing of all guidelines describing the paraneters, and 
checks only to see if the correct number (of parameters have: ‘beer: entered. 
PARAMS is only called by MAINOP ulienever: the: moded:4e-sek to 94: 
Operation 

PARAMS first reads the integer paramters., They are read one at a 
time, and non-zero or plys zero parameters are stored in the IPR array 
and counted, When a minus zero (-0), which is equivalent to a blank 
line or initial catriage return, is encountered, the number of parameters 
counted is compared with JIPR,. If JIPR, is negative, the check is omitted. 
This is used for OM with variable numbet# of parameters. If there is a 
disagreement, the program complains and requests that the integers be 
retyped. - 


If the count agrees, PARAMS reads the decimal parameters, and stores 
non-zero and plus zero parameters in DPR, ‘bounting | them. Minus. zero 
causes the program.to ehack the count wath, @DPR, unless JDPR is negative, 
as above, If it ig not equal, it compleins as above, allowing ‘decimal 
parameters to be rdtyped, If the count is equal, it returns tio MAINOP, 


Note: Both, integer atid decimal patuhid axa tebe whth. FQ0.3 format. 
Thus both. integer and decimal parameters must be typed with an explicit 
decimal point. Since <0 is used to signify end of parameter list, zero 
must be explicitly typed in. . a 
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Subroutine Pé RAMS 


Set B for 
Int. 


I= O43 


} Read one 
eae integer. |, few, Bevor |. 
: "| Message | 


Store in 


Is 
2) Y-3IPR Y 


. DEG. | 
it. 


Error — 


| Stores in 
DPR. 
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Chapter II 


This empty page was substituted for a 
blank page tn the original document. 
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Liss ss oR BE sues WP we OE oe cae 8 
we 4 “J mops , i ie AYPo4S On: 3G rotdots- ax 4608 42 ‘ 
ariae: } ei bbsar ofa ch yaiive ar) 45 De EL le j 


Sey Pere the qm jpr weet, ot an0P. he, silanes: 


to re lores indicate the modes that must ane must not go through each 
alg ad yam C qe i? atudedt sny me grazoreuul 
step. "Going ‘through a step is optiona foe ‘node number 8 not shows. ; 
gore S4294™ &@ ove shy 


Must be used b 


Steps 


la. Subroutine OP XX |. 1,2,3,4,5,9 


B. Storage Map 
Defines Common Storage’. 1,;2,3,4,5 


Cc. If MODE = 9 


GO TO 9 
Local Variables = IPR, 5 9 
DPR (from storage) 
E. IF MODE = 5 
GO TO 5 
Print Guide Lines 
Read from console into — 1,2,3,4 5,9 
local variables (carriage 
return in mode 4 causes 
stored values to be uséd) 
G. IF MODE = 3, ! 
GO TO 3 | 
5 & Execution | 1,2,4,5 ! 3,9 
I. IF MODE = 1 | 
GO TO 1 i 
Set IPR, DPR = loeal 2,354,5 | 1,9 


9K. Informat ion 
Set JIPR, JDPR, (fixed) 2535455,9 


1 1,2,3,4,5,9 
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The OP must be written to read in and execute with variables local 
to this program so as not to clobber common storage when a simple execute 
(mode 1) is used temporarily in the middle of the execution of a KOP. 


Normally, do not change mode in an OP. Leave mode changes to READOP. 


Depending on the nature of your OP, step 3 may be placed before or 


after step 5, the execute step. 
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I 
Writing and Ineotpotating a new OP ©. 

All of the foregoing structure except the execution eae has been 
preprogrammed in MADTRW, tP( ) and DPC , are ‘used as ‘Veeal variables for 
each OP. The exéeution atep “has been: extracted: and ‘placed - at thé end for 
easy constriction. Control te transferred to, it “Catabeinent 5 CONTINUE) 
at the proper time. You complete the patch by’ t#ahs€e¢ering control to 
7 (GO TO 7) at the. end.of the, execution, SheP. which you write. 

A. Construct cotmon forms to suit your ‘neade. 

1. Start by EDiting one of the Following forms from COMFIL 1 
{or. build your. own in. MADTRN, MAD or. FAP if. desired*): 
a. BFORM MADTRN for Beth integer anid decimal variables. 
b. IFORM MADTRN for Sieceere only. 
ro 


c.  DFORM MADTRN for Decimals only. 
d.  RFORM MADTRN for jo variables at ali, 


2. Insert additional DIMENBIOW, afatements in lines 41 to 59 
with the common elements. first, 


3. a. tnsert additional ‘COMMON statements in lines 91 to 99. 


b. Modify and recdmpile COMMAP to agree. See "Updating 
of CORMAP" es 


4. file as your own FORM for subsequent tse. 
B. Buiid the oP a ale SO ee 
_ 1. Edit a suitable common form, constructed as above, 


2. Change line.10 to read Suikovtihe. GBie | “whete | the XK is 
your OP numbér. Normaify, use rumbers between 20 and 90. 


3. Change line 20 to read youk ‘Weme aid the date (of most 
recent change). 


*Alternatively, the shorter FORM MADTRN or FORM FAP (also in COMFIL 1) 
way be used as-a basic beginning in-whichsmasesthe programmer would build 
his own structure and use only part C of these instructions. 


4. 


S55 


6.. 


7. 


Oo Oo 


(2.21 i 5/15/64 


Update dimengigng.-of iP. and DP on line: 50 if desired-- 
these were set at 10 each initially. The dimensions must 
be changed if JIPR or JDPR exceed the vacues in the 
common form. 


Set ILPR and “IDFR on ‘Lines 100 and a 


Add formats. for, printing..guide: ldnes*.,on: dine 569 and for. 
reading IPRs and/or DPRs on lines 570/580 if needed. 
-Standard formats’ will ‘ cert if noe? en ‘bat’ ‘will 

not read. inputs, ©. +... : : ee: : 


Construct the execution ieee ea 


location 600 in either manual or paromet te mode. 


ut 


Finish, with ‘Statements. GO TO 7 and | END, 


File OPXX MADTRN (or MAD or waey’ ‘where the- oe is the number 
of the OP. 


Cc. Compile and Incorporate ** 


5. 


MADTRN (or MAD or FAP) OPK. ox 


Delete OPXX MAD ner writing in n MAD), OPXX MADTAB and 
OPXX SYMTB (if°dsing #AP). ” 


-“Load the new COMMAP First,” followed by the~OPs package 


(containing SYS’ and: ALLOPY,, and’then your’ personal OP s. 
The reasons for this sequence: are as Oblowss 


a. All the COMMON storage waguiced in any of the . opts 
must appear in the” program loaded” ‘first. 


from 0 to 99; if you" “Yoad" the ‘OPS “package after your 
personal OP's then your OP& will be replaced by the 
dummy definitions of CALLOP. : 


“BSS files may be combined for easier Loading by using the 
. COMBIN®* gommand . Be sure to use the = since oe 
eldbbers the * “BSS ‘tristruct ton: © “¢sée-pg. “£70 


Do all this on your own number; not in COMFIL! 


PS Ee ES 


*Guide lines cue the human as to the contents and positioning of ..~- —~ 
the next console input. 


eat 


isda ‘Chapter’ Iv. for an- “automate bas to > parfare chess ateps using OPS-1. 


D. 


; Mode 1 - | The TYPED PARAMETERS are placed only in the LOCAL 
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In writing an operator, it is essential to understand clearly 

the different sources of the parameters, called LOCAL VARIABLES, 
that are used by an operator during execution. LOCAL VARIABLES 
must. be. buffered from the parameters typed in at, the.console and 


‘the parameters that are (possibly) located in the IPR and/or 


-. DPRehetsd0 that-ald of theseptione asséetated with the sik: | 


modes can be performed. It is convenient to use the following | 
definitions: ATO 


"1. LOCAL VARIABLES: the values of an OP's parameters | 


actnally, uged during execution. 


2% TYPED PARAMETERS: the values entered at the consolé, ~ 
3. STORAGE PARAMETERS: the values already in IPR‘arnd DPR 
storage. : 


Using these definitions, here is what happens in each mode: 


Pere ': YARZABLES and’che»OP ia axécuted.”: - 


Mode 2 - The TYPED PARAMETERS are placed both in the LOCAL 
VARIABLES and the OP's STORAGE PARAMETERS and the OP 
is executed. : -_ _ 


Mode 3 _- The TYPED PARAMETERS are placed in the STORAGE PARA- 
' METERS but the OP is not executed. 


Mode 4 - The user is given the choice of using the STORAGE 
PARAMETERS as the LOCAL VARIABLES or typing in 
TYPED PARAMETERS to be used as LOCAL VARIABLES. The 
user must take some action for the run to continue; 
if he wishes to usq the STORAGE PARAMETERS, he hits 
c.x. The TYPED PARAMETERS must not be placed in the 
STORAGE PARAMETERS. 


Mode 5 - Parameters cannot be entered from the console. 


These arrangements are mandatory for several reasons--perhaps 
the most important is permitting the use of Mode 1 at any time 
without destroying any parts of the OPS system. Normally, 
mode changes should not be made in an operation. Leave mode 
changes to READOP. 


Te ae 
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Updating of Common Map (COMMAP) 


To keep the common map up to date, it is only necessary to insert 
lines of coding for each array or variable added to the common list. 


These lines take the form: 

(tab) COMSET (tab) NAME,I,J,K 
where NAME is the name of the common area, and 1I,J,K are its dimensions, 
for example: 

COMSET KOP,100,3,0, 

COMSET MODE ,0,0,0 

etc. 


These lines should be inserted at the end of the TABLE list, and just 


before the line 


MAX PZE N 


me 
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Service Subroutines 


Several gybroutines are used by OPA§ fo-retydave. and. gtere: infor 
mation in-GOMMON,. These .aubroutines gan pe paed: bysany operator. Wai. 
will deacrdbe the. affegt and.the.calling: agquence fereach. of . these |. 
routines below: phy i Ry Sey bias: ee aS ae “ip A hee? 


CALL: GET(L,3,9,K): retrdeyas. the (1,5, K)th elemant ee. 
COMMON; Ib -plagea: the contents of the:celi:-negeygneed:in aq -seagistar: 
called EXCH, = 3 Ge mth ep pg? ob arpa tecriciess geviongele 4 


CALL “RUT (Ly1,J:K) places..the: contants.of. Khe BKQY.scegdatex inte the 
(Tod Kith plement-of Re Mthoding. of GOMMON. ou bea ge i 


SERB EE ‘Plades the contents” ‘OF Ah ite ‘the RXR vegistér; 


“cat EEA) places the contents of the ‘KOH register dn “Ae 


‘CALL, ‘GETLST(4,1,J) isces the. seacstisas ckbe Jbh es cuecie GucebeiS 
parameter if I=0, decimal  pavameter Af; Jml)..ofthe Leh line: ofthe KOP.,... 
list in EXCH. ea mie “iets SO. eisai ees G8 Gh. Gea. Satter 


CALL PUTLAT(L,1, $y place tha ieonuedté of’ the ERCH vegister Ante ~~ 
the position of the 3th integer oer: or: déedind? (142): peenatees bell ‘thie’ ane 


tT Shaky oy Fig ve 


Lth line ‘6f the ROP list. che Ge SEAT TAGE poli es ano ba 


The function OCTALF (I) has a value which te ‘the octal equivalent of i. 
the BCD number in I. _ 


Caeleegee 


These subroutines are available for use by any operator. 


Note: If one gets a parameter from the DPR (for example) and empties 
it into I, there will be no conversion to the integer mode. 

CALL LE(X) 

CALL EE(I) 
puts the contents of X into I, but it does not convert KX to an integer. 


Thus I looks like a very strange integer. 


san eee RS 
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o™N 


Creation and Conténts of Combined 88S Files 


The ‘CTS8 ‘opérator COMBIN'*°X BSS°Y BAS. 2 Shas the effect df 
combining thé: f£2@8°Y B8S,°2°BSS9,~A B88, °2 1°!) latdeP thé name“ BSB. 
This featfiré’-is‘useéd' to ‘make ft’ easiarito- load programa ' sais a? ‘e6m- 5S 
bined files, replacing many individual files). irl Goes 


“ope: £1%é SYS "BSS, for%examplé, “edatadde MAIROP BSS} - CALLE? Bas; © - 
READOP BS8;<PARAMS 88S; SERVIC’ BS6: °° TRE? CARLOF ‘888° and “SERVIC: BSS: files 
are themselves combinations of further individual files. ins 


‘Wé Have databitehéd"tha proceduré of dat ing éach FAP’ and-MABTRN “' 
file. It is impossible, however, to date thé BS8-files for aay ‘such infor-/ 
mation would cauge. them to operate. incorrectly..,.For..this..reagan, we >have 
established the jPROCeGUrE:, of ercat ie pt hee yith Buc eeiaeady rte aera 
SYS FACT simply eonkeine. the date on which SYS BSS was put together, along ae 
WIth @°dageriptioh of the ednténts df SYB8.° PACT: files wild usually ~° 
appear ‘only ‘for°fttés for Which°no MADTRN of °PAP*€ileextets.” Ina’ few ~~ 
cases, however, it is necessary to point out some peripheral facts ;-'atid 
one will.appear.in thege;cases,,, For example;CALLOP FAP ts: the routine. 
which does. the calling of:eperators. .CALLOP BS§, however, 48.4 combination - 
of this file and one called SUBCAL FAP, and thus the file: GALLQR FACT. 
appears, and makes note of this fact. Should the user wish a part, but 
not all, Of some combined file, he just Gene ce care | from the ‘COMFIL, a 


and combine them under his own number. 


if 
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Error Conditions in Subroutines 


This note has two purposes: 1) to ‘explain ¢ the behavior of ors, when : 
certain error conditions arise; and a ‘to give the user &: method for. 
SU Bo LE 


handling ertor ‘conditions: within his own subroutines. 


a han @ 
V¥ if: 


If we have a subroutine which is common +o mevetay operators. (such 
as GET: etc., which is common 4 oP ‘T6 ‘and oF 15 “and others) and an . 
error condition arises which is jacortecestla ‘within the subroutine, dick 
we have @ problem because if we return ‘to thie calbing operator “it will 
behaie as ‘though the subroutine het operated property. TS get atound 
this prob lam wahave established a ‘retin te niinidl witioet ‘tadteeete tag . 
any: Qedarter 8: ae OF M8 ee See a ee a ts : 

To. use ‘this error routine ‘simply CALL RETRN, - Gontzpl will | pass to 
RETRN ‘(which is actually part of CALLOP) vhere w we ‘will test, mode». Tf in. 
mode 1, control simply passes back to MATHOR . “Te ‘in some other. pode, we. 
first decrement LKOP in anticipation of ‘WATHOR s ‘incrementing it. In all 
cases we Bet JIPR,” RPE ahd! JEBP te ‘ceva. Mriis , whiitever! the danas we 


return to MATMOP withine chehging any puiacets.’ ° 
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Variable Numbers of Parameters | Eve 
taht z : : 5 a re hoes SpE Fp pie er ier mes 


pea eae le 


Si 


be ‘Variable AS és, ops 91 and 99 ‘described in ‘Chapter IV). Certain 2... 


yo aft 


For certain operators it is Rett Wee that “ene number of parameters 


problems, however. are 2 created by thie and th Lg note will attempt Wissen ages 
explain, mode by mode, how they may be resolved. 


iw “ty 
32 Ooo mosrmus ajo aby hijwo osmacty 


“Tn ‘mode aS a variable number of Ry clearly ereates sno , Peablen, 
at} If ra) é. 
since the parameters are ‘only used pocal iy. 


7 ap boas roy ohh: Ags STATE tee 
tia agfety, ep‘ septa BLOOM: ests eBe fF ai : Bb asst: oN © 


Aas oe fe ait Pilly ' 


ms Pi Sage ie 


an, “nodes Qy 3.and he we are emedhia the parameters: fron the. console 
and thus we accept. however. JURDY, pre, aptered.., The. one reatrféption con these: 
modes is that Af we are wedting in the, middle .of an QP we must bei careful’ 


<a 


not ‘te enter more parameters than there is spece.:., Thug tif:.we: erronepusly | 


enter 7 parameters for an operator on line 5, we may £9. back. Spay. when we 
anes: eit mie omidued 

are ‘iow ‘on lite 10) and enter “six parameters on line 5y but we may PS, ava 

Broo (FOLLAD io Jteq ¥e 


correct” it to ‘eight parameters. If we need gight paranecere,, we must. se fos 
PTAM ot peasd e@e98esq “- ja 
return $37 ine 5 and continue ‘eron there. ; ete, Bakes 
Re ee, ae 2 OAT AM fo hdungho,aan fa qos A PER SATS spe tten ot a 


in made. Ds “the, rout ige must know, how, mapy parameters. TP used by « 
the OP. It can find this out, by. differencdeg, KOR(ISOPH)2 o9d)rund: 
KOP(LKOP, 2 or 3). 


In mode 9 we must notify the PARAMS routine that any number of 
parameters is acceptable. This is done by setting JIPR or JDPR negative. 
PARAMS interprets this as a signal that whatever number of parameters are 
entered is all right. 


3.00 


Chapter III 


This empty page was substituted for a 
blank page tn the original document. 
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NO OP (OP 00) 


Purpose 


The main use of this OP is to replace OP's that you wish to delete 


from an already constructed KOP. 


Operation 


l. No parameters. 

2, If mode is 1, 2, 3, 9, set 
JIPR = 0, JDPR = 0. 

3. If mode is 4 or 5, set 
JIPR = KOP(LKOP+1,2) - KOP(LKOP, 2) 
JDPR = KOP(LKOP+1,3) - KOP(LKOP, 3) 


i 
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PRINT KOP (OP 10) 


Purpose 


Prints KOP's and associated IPR and DPR lists. 
Operation 
Prints out: 
FROM XXX TO XXX (XXX referring to line numbers). 


Will print out from N, to N,-1 in KOP list. 


1 
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LOOP (OPs 11 and 12) 


Purpose iis ae 8, 22 ieee ERY Hoch BO WAL AO tee Bes: sae 


These. two: OPhoptovidecg theaab Sd? yodtvodted: Fepeeibtsic of any 
sequetite (Ofrother G8'sii THeic énisteddacaliédw UGkration 6f atetiigs of 
OPy,and further provides gn, indexing parameter (INDEX) yhich may be 
referred to or altered, bythe OF's.of the sequgnce.,..By wirtue. of the 


2 OD 


nesting feature, the LOOP OP themselves may be elements of the sequence 
of other LOOP OP's OP 11 is used to initiate a loop, and OP 12 to 


terminate the range of the loop's sequence. 


Parametera used by ops 11 and 12 

1. A one-digit integer to designate which of nine 1 x 4 arrays in 
common is to be used in the loop defined by OP 11 at the beginning 
and OP 12 at the end. The nine arrays allow loops to be nested 
nine deep. 
INDEX(i,1) is the actual value of the index i. 
INDEX(i,2) is the highest value index 4 shall be permitted to take. 
INDEX(1,3) is the incremental step by which index i is altered 

during each cycle. 

INDEX(i,4) is reserved for internal bookkeeping, and refers to 


the range of the loop. INDEX(i,4) should never be 
used by a progranmer, hor need it be. 


2. The starting value of the loop index. 


3. The highest value of the loop index to be permitted. 
Note: This value may never be attained if the increment is 
greater than 1, but in no case will it be exceeded. 
4, The amount the index is to be incremented during each loop. 
(This i8 set equal to one if read in as zero.) 


These parameters may be read in by either OP 11, OP 12, or both. Any 
parameter read in by OP 12 will replace what was read in by OP 11. 


3.31 5/15/64 


Operation 
1. Specify OP's and read in parameters while in mode 3. 


2. During execution, the OP’ will test to see if the loop is 
satisfied before executing the first pass. When the loop is 


satisfied, the KOP will continue with the OP following OP 12. 


3% It is possible for any OP to modify or refer to the value of the 


index, the increment, or the final value, during its execution. 
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3 
: jo ee 
te 9qyT 
balan i oe 


(opt 13 did Sef leeks ee 


4s we 


* 


TY Oe FRE a ORS dye SR ee KR va, ee OA TE 


Object ives Soya Df gay. ae 1 
OP 13 and 14 aré weatk-to wmMntrol .the .saquence in which operators are 
executed in a KOP. GP ce} vaueed control to .canditiangl ly -bsenach to the 


no . > tit Wee « 


OP 14 which has the damm \fidist: perameter. . Any number of -OP IT's may 


branch to the ame 0. : : : — 
jg2 Pe a v ake {is ays S as¥ 63 gnitniog ayatece cag ond 37 


Parameters used by OP 13 p .onas of Ieuge 


1, A&M Ando «di gett tertdger'! -betwedn ID anil 20 Wisgdieog teeecthe d adakd ad! 
in a single dimension array in common, ISAT, which contains the 
LKOP of an OP 14 so that OP 13 knows where to branch. 


2. Parameters required by GET routine to retrieve the contents of 
a location in common. The contents of this location will be 
referred to below as Var 1. 


3. Another set of parameters required by the GET routine. The 
contents af this location will be referred to below as Var 2. 


4. The type of conditional branch. 


Parameters used by OP 14 
1. <A two-digit integer between 1 and 30 which specifies the loca- 
tion in a single dimension array in common, ISAT, in which the 
LKOP of this OP 14 will be placed. 


Operation of OPS 13 and 14 
1. If all parameters are sero except the location in ISAT, OP 13 
executes an unconditional branch to the OP 14 which has the 
same first parameters as this OF 13. 


2. Otherwise, OP 13 executes a branch to the OP 14 with the same 
first parameter when the type of conditional branch is satisfied. 


Type of Conditional Branch 


Bayern 
NE - -1 
Lisa A tx 
Les 23-0 seals" se 3 
CE ti BT is ea, by fe 
GE - -5 


If the parameters pointing to 


equal to zero. 


The only parameter called for 
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Relationship of Var 1 to Var 2 


Var 2 


by OP 


. Varl = Var 2 
. Varl # Var 2 
. . Var 14 Var 2 
. . Var tSvar 2 
. . Var 1>Var 2 
. . Var 1#Var 2 


are all zero, Var 2 will be set 


14 is the location in ISAT. 
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Purpose _ : 
tapes ‘ eed Sah AGS SAM 


OB. 15, 4x a antiies ieee ioe: -of the ops avaiee: which allows the 


user to look at the cantents of:amy single cell in COMMON storage and to 
change the contents, if desired, The cell in Rreupiee storage can be in 

the data base, including ‘the KOP and parameter ‘ieee . all 
tions can also be | specified by indirectly ‘addressing the e particular QP 


£ 53 slora i 


Jeelh! loca=' 


of interest. ew 


As secueneig ir eens OP 15.is ee ta. deal. with. ee one cell or 
word of COMMON storage at a time. In the future.it.may he desirable to 


provide for printing and possible (selective) modification of blocks of 
to ouisy sf} oe. Lie 
COMMON storage at one time, It would also be advantageous, to address a 
cer :, 
line of the KOP relative to this OP 15 ‘dian: it: is being aeee 


Se Tang th Mee Sy badgne rdpouor Nae 


Description of Parameters — er 


HPL ENIRES oR cot 


‘Maids vbines will be printed a3.shewn belew when -QP.45 is,.called in 
modes*1 to 4*inctusive. This’ isa Feqiiéat” ‘fat! the® ‘five integer ‘parameters 
which OP 15 requires: CODE, LINE, SUBSCRIPT I, SUBSCRIPT cA “and SUBECRTES K. 


1-FIX DIR, 2-FLT DIR, 3-FIX IND, FED THD 
-@. UN. §8t S87 SSK..: i 


-iMser typest. KoRK XK: XXX .XX . 
Rive Integer Parameters 
hae a (gopE indicates both the. type ‘of data being ‘addressed and 
. the method of adaee eins As ‘Listed in the first line of 
the guide lines, the alternative values ‘of CODE. are! 


1--direct addressing; integer data 
-Q=4direct addressing; decimal data ~ 

3--indirect addressing; integer data 
“Astindirect addressing; decimal data’ 


22,2 fees woos 


wat ac3e51 5/15/64 
Direct Addresging 2 +o vbpdizest Addressing 
2* LINE of COMMON storage LINE of KOP which contains 
being addressed (see the OP whose IPR or DPR . 
MAP MADTRN or MAP FAP) parameter is being studied.” ee 
ie ay Fw mateye Bs Tunpge fe othe ‘abseluté Einé of’ 
Wis RP PGR GL IGMISR eh “dow og Doone “RGP 5 not PéeEeeLve s Sh Aagl BE 
3° “gsr i is the value of Relative “Location in ‘the ses 
ul 7 in ARRAY(L, 3 1. ~ ws “gelected | OP's ‘parameter es ee 
ee ere ee ae ‘dell, “ddabe (AO or Carriage = oe 
being addressed is not return will be set to 1 ee ie 
an atraly, “2ebd or fote® “tne lOP sey 22i we eae 
ae “EB IL2 9a ge bée‘useds 00 whe “Sa POS geod MCEAMONG Clas bere. 
oc ue "ssa is ‘the value of ot used)” een wel ees, 
° : Jin ARRAY(T, J. 7K) ea ~~ : oe naa sae oon 
»O8@u Site a af mege Cf aft eifiS os svtteiag Pan hi io sad 
5 SSK is the value of (not used) _ . . 
K in ARRAY(L,J,K) SsaP MBE Co Tye ieee 
i.  WOnky the first two etriescare mandatary: -1f-thendddrésedd 
+s -Vaglable isnot dimensiggal. then, these, two parameters gan be .;. 
BOS pater ed, folioved | ie a iene sae cara er ie@euduped? OF HO a2 iiw 


One Decimal Parameter 
SES 


arb 


OP 15 can be used in modes! “ wild ser bo: “automatically eae: 


the new value of the specified word in the .DRR.. pige 48..0F .. AS", & ,gne 


DPR parameter. This B se eae be it integer or decimal when used, 
DEE ied Tatas OO Go SBE wi poteorpint &BgOD "7 

is always stored in decimal ‘form ané@“mdst be entered on the console 
: Wess ER, aA .enssieubbs do sddoam arts 

in decimal form, ° , = 


LES voi py ORES COREL By yess 


Operation of OP 15 
aa SELF Sriwhies oc? G--i 


To clarify terms in sbavdeaceiue lon: ‘eyAjoaac the..fallowing definitions 
are given: 


Rie sulee Ser: pe riage goa aint % 


VARIABLE: the, sit: or. word, $0, COMIN storage being referenced 


by this particular OP 15 for inspection and/or 
possible modification. 
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VALUE OF THE —_ ; 
VARIABLE: (PARAM VALUE, STGRAGE VALUE, NEW VALUE) 

When speaking of the value of the variable we must 
specify where --.in the parameter set, in COMMON 
storage, ar being, read: fromthe console. 

PARAMETER SET: (REFERENCE, PARAM VALUE) 
: The aix parameters sagaplated with Ente particular 

OP 15. 

REFERENCE: the five integer parameters which ore the 
location of the VARIABLE in COMMON storage. 
PARAM VALUE: the one decimal parameter which is needed to facili- 


tate the automatic execution of OP 15 in modes. 4 and 
5. It is uyaed. fo reset, the STRRAGE VALUE of the 
variable. 


STORAGE VALUE: the value of the Cae eee 


NEW VALUE: 


All nades 


MODE 1: 


storage. This is always -used to represent the 
current value at the time this partieular OP 15 
is encountared ar When the dnaquiry ie made. 


that value of the VARIABLE which te cand from the 
console (as typed hy the user). 


prior to exit aren set JIPR = 5, aad: JDPR = cake 


OP 15 will print ous the guide lings as shown above and 
read from the consgle the REFERRNCK.parameaters. If a 
carriage return is given control will be released from 
OP 15 (i.e., RETURN is given). 


The STORAGE VALUR of the variable s@ refer anced will be 
printed on the console. — 


OP 15 now asks for a NRW VALUE to be typed on the console. 
It mugt be typed _ vesainas point gegardiess of the 

i i Se Ate dis to be an 
integer. the. OP 15 5 make the negsassary conversion. This 
conversion removes the necessity of typing in redundant 
leading zeros. 


The value so typed will replace the STORAGE VALUE of the 
variable. 


If a carriage return is given no change will be made to 
the STORAGE VALUE of the variable. 


MODE 2: 


MODE 3: 


‘-.-MODE -4: 


MODE 5: 


if a carriage return is given ‘the PARAM VALUE will replace 
os wg tr FARTS Pe eo Ar i 


| E ‘the REFERENCE ‘pardmeters.. 
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As mode 1 except that the REFERENCE parameters: | will also 
be entered into ‘the KOP list of th¥s ‘particular’ OP Y5 and 
the ‘PARAM VALUE’ of the variable will ‘be set equal to the 
NEW VALUE £8 one ts typed onthe constlfe, or it will be 
‘get equal ‘to ‘the STORAGE VALUE if ‘carriage return is 
given. vt One. 
BI PW > ite HATAMaAD. 4 

As in mode 2 except that’ the STORAGE VALUE of - the variable 
is left unchanged (this is the no ‘éxecution feature of 
this mode). As before, the PARAM VALUE of the vara ke 
will be -sét’ équal ‘to ‘the NEW VALUE if‘bne is ty aay 
the conséle, or it will be set? éyual to the STORAGE VALUE 
if a Carriage Beturn is Bivens 


are Bord 


‘The REFERENCE pawaneters;’ halving’ ‘revecusty been set, are 
. printed ‘bn “the -coriadéle “immediately ‘following the guide 

lines. If a new REFERENCE is typéd injit will replace 

the old one in the KOP parameter list for this particular 


' OP 15. If a ‘carriage return, te ‘Bivens, ino ‘dhelike WEE be 


made! in the REFERENCE. - a8 
“Note: If a chatige is’ to ibe nade, pres oe of the parameters 
‘must be. retypéd on the console’. : 


‘The STORAGE VALUE and PARAM VAIUE of the variable ‘so ~': 
referenced wtll ‘be typéd'on the consdée@ and OP 15 will 
then ask for a NEW tae ot ve wariebte to be Eyre? on 
the cofisole! - 3 OF SOLIG taood 


‘* The value -s6 typed (with decimal point +see Mode ETT 
- replate ‘both the one NEA and the chprie VALUE of the 


f eS" GEES a 


‘vartable < 
em) fi " 


In this automatic KOP execution mode the ‘eniy action taken 
wher ‘OP 15 ‘is encount ered ‘is that ‘the STORAGE’ VALUE is 
‘replaced by the PARAM VALUE -of the ver febTe tdeferenced by 

_ MoEHiny: pe ut on the console. 
“This ‘action: might | be useful ‘ “in gente ort Sif l gaa ae a 


i 


_ 
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esse a * 


Purpose 
The’ purpose of MOVE’ is to allow one to nove hey" ert ‘tint canon = 


storage to any other common location. 


Use 
“Hach variable and array in common is assigned a Titie number’ is 

external Notatton.'* These ‘ave agsignéd ti ‘order, €:e.';'1=KOP! 27PR, 

3=DPR, . . . etc. We would refer to KOP(62,2) as 01,62,02,;00 ‘atid MODE as 

9,0,0,%:. 0. - sel, soe podmen ast 


This ‘operator hae eight aSEeSAE Titame tere: 


eae, may “be made directly, to a | commen cell, or “indirectly . 
chroueh the pointer list to the IPR or “DPR. Such a reference ‘is ‘made 
relative do ‘the ‘current ‘LKOF ‘and ‘taked the féTiewtng form: - 

“i * RETAT ss nek eioeaiob Ye Wy euTdiny teh jis mags io tpaectenar. 
which references the INCREH’ ‘parameter Of the TPREXPREOY or DPR(XPRYP) 
of the (LKOBRBLAT)th ‘Line of the aperater list .%: |. 


“Entering the operator causes she mesaage FROM LINE. his Fo K) CAR 
RET. FOR PARAM to be typed. If a direct reference’ ts desired we type 
the liaé nimber and as many: indicies At MECOERETY “Ef we. wish, to make 
a relative reference we carriage return and the ‘wédeage Be tule 
RELATE; O=EPR -LHDER, -INGR. ts typed. ..Thea.we type in the 
parameters. indicated above. 


After. completing | either. of these procedures, the peccess is repeated 
for the receiving location. The message TO LINE (1, J JK) CAR. RET. FOR bina 


is typed and similar entries made. 


aa a 


*Relative references forward (RELAT>0O) will not be executed properly 
in the CREATE AND EXECUTE mode. 
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Writing KOP, onto Tape..(OP 17) 
Purpose le iespetts 


OP dintRiteS @ KOR, wich, associated integer. and decimal. parameters, 
onto a simulated tape. 


QOneration 


bert LE Seay Cae Be 


The user:.is. asked to specify the number of fhe KOP,, fhe. Aine | number 


oe eee 


of the firet OP in the new KOR, and the, line number of the, last OP which — 


is, ta be, included, 


; : C fees “as roi : we we 
nl rea aie , ee oi we WZ ew x ’ 7 ¢ . * 2 4b. des 


If the first line number is not specified, the number 01 is auto-:.) * 


matically assigned; if the ending. line number, is. not specified, it, is 


assigned at execution time and will be the baw number of the OP sumed 
abarr 9c that BSD: as 


lately preceding the op 17 ‘being executed.” 


ee Te HST Say 2 ee yetatoa a." 


Once dhe beutaninies Aad ending, lines of the. KOP list, as. well. as its 


number N, have been determined, OP 17 deletes from, fhe disk file aie 
file .TAPE. Ne, If then.weites 5 quantities onto, TAPE. N: 


l. The number of OP's which sre ‘to -be fac heded in ithe mew KOP.. 


2. ° The’ nunber' of oo ea ~@ssoc iated swith the OP's: caine 
Ae . Included. in the KOR... 3 rab op Ch Sg en po 


eet ede P ey OP AT, 


3. ° The number of floating point -parameters: associated with: the ° 
OP& being | Ancluded, dn,the KOP. aoe : Z, 


“AA cae 


4. * The-integer pointer of the first OP .6f the ‘itew ‘KOP..: 


5. The floating point reese of the first OP of the ‘new KOP. 


“These five quantities are used when ‘the ROP ‘te *réad back into ‘the 


. computer by OP 18. 


GIN Ai elit Ae bots Ph see a Se 


After these five quantities, the array of OP'& and pointers in ‘the KOP, 


the integer parameters, and the floating point parameters are written. 


+ has . A ae Fs Barmy haley chs a Sapa 2 a 
: : Seo Gh hops ee PEE Ee DOBRO ye ta 2 


PPE atl le Uae Spee AES ee 


held GG: { i ica teres ' ee es Seah aS ty 


hl 
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Use of OP 17 


When OP 17 is entered, it types out the request: WRITE KOP XXX, 
LINE XX TO LINE XX. It expects input in the form XXX XX XX. The KOP 
number must be specified; if the two line numbers are omitted they will 
be assigned as outlined above. If you are in the create mode, the reas- 
signed numbers will be stored in the IPR list. The KOP’and its asso- 
ciated parameters are then written on a simulated tape XXX, with the 


creation of a file .TAPE. XXX. 


aye tvs iv .+3.80 5/15/64 
Reading KOP from-Tape (OP 18) ©2070 8 SG ba g8u) 

PNSY GON TINK ocegecpaxy wc dito aeqy2 4i ,bsretne al VE YO meri 
Gye ae WA Ue tetas: sid ak dJuonk etoeque $2 XX OMT OT FA anid 

Purpose fg i fa 

iliw gait Letgime ste atedmun ands ows aft Yk ,;berliseqe sd game dmun 
OP is Velde che KOP back into the comput ks £ he b ad 
a3) 984 .sbom sina1o s/5 sh Sie uo¥v s}° AS of Rant oS 2RURe LER be MES od 

£ the KOP for the line on which the KOP is to and 
. : eee ear bee YON aAT (XQF te ‘ ar ne ay ead in, aAlw for the. . bontale 


batafonte s ao mag3 


first line ‘of jaxecurion: Jf ne lige pe ts giyen, the Rrostan . ASSUMES «535,12 
the KOP is to ‘be read in starting with line 1. ee 


LARY WSTAT, sii sp to morgsets 
During the reading-in operation, OP 18 re-assigns the pointers of the 
KOP being read in, and adds the numbers of the IPR and DPR lists in their 


proper places. 


If an attempt is made to read a KOP in from tape and the first line 
number is not 1, there must be an OP, with pointers, in the preceding line. 
If there is not, OP 18 will not know where to put the new members of the 
IPR and DPR lists. 


Use of OP 18 


OP 18 types out 

READ KOP XXX, STARTING WITH LINE XX, EXECUTION STARTS ON LINE XX 
It expects input in the form XXX XX XX. The starting line indicates the 
line on which the first OP of the KOP is to be placed, with the others 
following sequentially. If no starting line is specified, line 1 is 


assumed; if no execution-start line is specified, line 2 is assumed. 


The OP computes, with the first five numbers on tape, the new values 
of the pointers of the KOP being read. It then assigns those new pointers 
and updates LKOP, LIPR and LDPR. 


If in mode 4 or 5, execution will begin at line XX of the KOP being 
read in. For example, if XXX XX XX were specified as 100 20 05, the KOP 
100 would be read in. The first OP would be placed in line 20, the second 
in line 21, etc., of the KOP list. If in mode 4 or 5, execution would 
continue with line 5 (line 24 of the KOP list) of the KOP which had just 


been read in. 
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END OP (OP 19) 


Purpose 


The purpose of the operator is to provide an automatic termination 
for KOP's,s It also provides a simple way of exiting from the OPS system 


back to CTSS. 
Operation 
L No parameters. 
ian If mode = 1, EXIT will be called. 
3. If mode is 2, 4 or 5, prints out "END OF KOP" and sets JKOP=0. 


4. If mode is 3 or 9 OP is not executed. 


This empty page was substituted for a 
blank page tn the original document. 


4.00 


Chapter IV 


This empty page was substituted for a 
blank page tn the original document. 


Tk ahaa hela os. fae), Sante setter cag hie eS eo, SR te a cate ape nl, REPT 
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sot ei ee Sha ren be! gee 
CTSS OPERATORS 
by 
SRG GEES 
Davie Ness 7 
mf ea aii eee toa Que Th aeirgmon cers efit en tua: 
anos § 


In building up a system from the standard OPS base, the user programs 
new operators and modifies old ones. He may also want to alter his “map?)%:°" 
of comhdn stOragé, and pétform dchet activities’ scnig enone ¢ 
jurisdiction of the time-sharing stpervisdr:!) °fii teqet sad Ge syec aa ta. 


For some purposes, it is convenient to be able to do these things 
aed EBiogh 
as though by operators of the user! 8 system; that is, without returnlig ~~ ~~~ 
: rondie 213 J9mB18q edt aqtisido c090 
control ‘to TSS, The ‘follov ving s set of E operators gives the user this 
ty 3 Spe AY t oo 22 gH2 eoicnex 

ability, for ny cTss command. These operators were progr 
no 


ogr aumed before ‘the 
Oye oa 


i SUB TOFRIS IO 2) pa busstnge tngad adt a s/4 35 hstyos a 
RUNCOM ‘command of CTSS was available. 7 
robe ti nobisitymosd st skid ad3 To nobis! town. 2 it xet efi: . 


Byeq ce ba. eSB ES 4 : Waady n't foresee ley, | gyiee-te ne fees ake Ste oat 
Pas S25 es WP BS LE Pata k ee ae jel boson i ov re is Pe Gawd Zs 


Ast. 


ae 6 ef iW abt 
a oo Zz ee Pa a 3c Ei £ { 
i % i abe: sig £ ne 
ae ip 
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OP96: Input and Compile 
LOT LAE CRP 


Purpose x P 
Inputs a file and compiles it into mechine code. The sequence is 


automatic. 


tev BP at 


Parameters | ant edhe. Pog ipl fo i seca fi: seriibom bn. 7948 taqe 
Two tavesen: daxcoatix: 50D). sparametge esi the. aiasn: ef. chigctaesk file. 
and the name of the input file (in that. Eder «: . .. nhs 


Aah coy 


Operation . 


OP96 obtains ite Parameters either from the console or £ from the “TPR ie 
Hf oale 34 : rere Sat 

list. Te ‘then executes ‘the ‘cTss ‘command, inPut. ane the FILE comand 
: RTOS BBSE names Get B FOL dhl: 
is eeccuted: at the end ‘of the. ‘input sequence, ‘the cgnerater automatically 
.olagilavea esw @eT 3s brissmose MOC In 
calls for the compilation of the file. If the compilation is successiul, 


iat 


extra files created by the compilation are automatically deleted. 


Guide Lines 
INPUT: CLASS NAME. When this information is received, INPUT YOUR FILE 
is typed. 


Note 


If we supply the operator with parameters MADTRN X, for example, 
and then file our input under the name Y MADTRN, the routine will compile 
the X MADTRN file. 
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OP97: Edit and Compile 


Purpose 
Edits a file and compiles it into machine code. 


Parameters and Operation 
Exactly as in OP96 except that an existing file is edited, rather 


than a new file created. 


Guide Lines 


EDIT: CLASS NAME 


Note 


See the note to OP96. 
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OP99; System Load 


Purpose 
Loads new operators, BECe without peeves OPS. a 


SS: a0 aaliquw.: corre 


Parameters 
Variable number of integer (actually BCD) parameters+ “atiese parameters 
are the BCD namés oF thé flies to Be teadeal®"? 249°%9 SPIO + i 


ee ears alt 


Operation 


Loads COMMAP, SYS, ALLOP and any other files ne ee as paraneters:. 


Aceh Pa 
The sequence is as follows: as 


1. Get names of files other than COMMAP, SYS, and ALLOP from the 


ies 


console or from the IPR soe 
CTEST4 COMMAP SYS ALLOP and the indicated files *~ 
START (i.e. execute a START command). 


Guide Lines 

TYPE NAMES OF OP'S. User types a line of BSS file names. For 
example typing the line “OP92 ABC OP91 XY§" would cause COMMAP, SYS, 
ALLOP, OP92, ABC, OP91 and XYS to be loaded. 


Note 
This operator, when executed, destroys the common area. We will 
later describe a pair of operators which can be used to save and restore 


common. 
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Q ixtig2n% Sa 


OP93: Define Own pas 


Se ati a VEN 
Raa ee 


Purpose sae nee 
igs MORAL fe eTosy. is 
Eliminates the necessity of the user's constantly Serer his “COMMAP. 


Parameters and Mode 
Pe ee Bie te ar atk Bao 7 VIamesed ¢ 
OP93 is executed cemerdiess: of ‘mode lead ‘thus it does aoe change the 


an ha 


IPR in any way. 


ay 13h) 
SES  bnsiom Fa ae thet Meiriuo Send fyacea: Fel 3: troebaysupet 
Operation 
2 BRS nugad tk , bah MES TAS 
_ Allows the user to extend his common map. It does this by breat ne 
a file called OWNCOM FAP which is the map of the user's own common area nie 
Soeth kede ee ede 


(i.e. his emt easton to ,fystem. common) =, oe ney ek 
COGO mp &e aims H OD EL MAR CBOE GW Mea 


Guide Lines 

CREATE COMMON: NAME,I,J,K CR # CR. User types an arbitrary number 
of input lines of the form: ABC,I,J,K where ABC is the name to be assigned 
to the common array and I,J,K are the dimension (explicity zeros for unused 
indicies). When all of user common has been entered an extra carriage 


return terminates the operation of this operator. 


Example 
To add an array A(27,3,4) and two single cells X and Y to common 


(in that order) we would type: 


A, 26,3,4 

x,0,0,0 

Y,0,0,0 

(carriage return) 


Note 
When OP93 is executed a new definition of user common is made. 
Nothing of previous definitions (except system common) remains. OP89 


can be used to extend common by adding to the current GWNCOM file. 
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OP89: Extend Own Common 


Purpose 
Extends (not recreates) OWNCOM FAP. 


Parameters and Mode 


OP89 has no parameters and it operates regardless of mode. 


Operation 
Equivalent to OP93 except that current definitions of common are 


extended, not begun again. 


Guide Lines 


EXTEND COMMON: NAME,I,J,K CR # CR. User input is same as in OP93..- 
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hOGe: 


OP92: Incorpofat é ‘Own’ Common ta 


Purpose 
Incorporates a common map written by OP93°(i.¢.°26 éréate the sss”? 


version of COMMAP with the user's own common). 
se hecbl ran sog f00a vilcautogs) cesecua: Bo tosean: oidgire. 
Parameters and ‘Mode ! Boat bs icguire 
OP92 has no parameters and operates (like OP93) regardless of modé. “°° °™ 


ee ee 
Hor prea 


Operation . . Lie Sg 
Assembles the file COMMAP FAP with owNcom Pap” inedi porated, detétes® © 
the SYMTB file created and returas doatrel €6°ORS* “it ddes'ndtdutdinac iy?” °°? 


cally load the new version. 


Guide Lines aual dd sDoint 
FAP ENTERED 16 DEFINE COMMON. There is no’ uéer’ ‘Tput. Sone = 
OMG Fed) subee: Saridm woof aaa 
Note 
If OP92 is executed sitet no OWNCOM FAP present, it sunee creates ees 
blank Sinioon. oecera Beh a oe ty Oo} 2¢4 SYS Sen 2h Visto aay: it Poe ae 


PY a. oar rebei uor-lnewg iyo 


Je ob £ siet aah vi 
Jk 
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OP98: Combine PSS Files 


Wg) 


Purpose 
Combines any BS§ files (used ta.create ALLOP) 


Parameters 
Variable number of integer (actually BCD) parameters. Thege. para- oan 


meters arg the BCD names, 9f. the. files, to. be. combined fy: 


Operation 


Requests the name of the combined file and. names.of the files to be 
combined .inta this file, | It autamatically seta wu and executes. a _GIss or 


D Btu 
COMBIN operation. 


Tea REY aa 


Guide Lines 


ENTER NEWNAME THEN | ALL. TO BE 3 COMBINED. Ugar types. the new pame_ and 
the names of all files to be combined under that neme. 


cera wit} Ca a ee 2 teen 235 


To add the files OP27 BSS and SUBR BSS to our present ALLOP we ‘youd a 


type "ALLOP ALLOP OP27 SUBR" which would combine under the name ALLOP the 
files ALLOP (the old one) OP27 and SUBR. 


Note 
This OP can only be used with BSS files. 


fe. 
ph 


7 ‘ 
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OP9i: CTSS Command” = *" ““"" 
spay tu 
Purpose Sabon 
i oYeas 7 avol i: 


Allows access within OPS to any CTSS command. 


Parameters . 
Variable ‘number ‘of integer (actually ‘Sts ‘ pdPddecéve: act ‘pata aan 


ws | aft i JF iz? 3 2amenr U5 aun fseiaya yt} 
meter is a single Sond’ of a “Gtss'c = pene) ti na adiedse}.* : ° ESOS) 


t te 


fwokos bedtiakews) Plas ‘et! guftorsh agg tirg 


Operation 
Reads in one line of information which it expects to be a CTSS 


aka * ere re Son oye >t x ; 
CAUMBOGG DSYAM beans Sssio bas (OSYAM 12.4) oma a 


operator. It then executes this’ ‘Sperator: . 


“y Si Ts - a ee A se t 
98 fetid vay ve boxers P¥oa gota wovt sifen odd dn Lt os 
a ae : bi, i / F 4 j t 4 
; a “hater Pe ge oboaoes at vd beseueb Piss. atiou! s+. tempered fe 


Guide Lines 


CTSS LINE. User types one Line BF 1% pat in the adHnal Orés fashion.’ °° 


Above sebbeoy act aideiisve od Pftw F239 228  oavods 


Example 
If we were to type * RENAME OP27 MADTRN OP28 MADTRN" we would exseuite asus 


: he Nenving OFS. wsall  HOMMQ) Tio Teo RIT 
the rename command wit out eav ng 
Dh yt “Pero t 7 ; 7 ° 
De ¥, ASS ap REV T eis 62 Z ey $eato oriteact Sk fo eS DeLay sar’ sf oO agiBs 
£ PEAT ED, Swe, Al iy Siit @aass » a EGE og ehiet “ 
: 4 : 
2 2 af ‘ eet gb sorpaug tay > if ab PS cach 
At ¢ me ple r 
“ Boa B x 3 £35 sey é Ah YVR wer 2G 2a et ft Fee 
\ 
% Che cast it f re Ew ' = a 
r : ‘ f aut oid ; 
P 3 ne 3 a ? t ie f B, 3% ta 
~ + ae & ee Soa #30 2%) fb Fe AGS ‘ Pi aa ece S7 
: aay an H ot re st ein oe at ral i testy sa 


Redes aon xe 


OP95: Write Common Area qn Digk _ 


Purpose 


TEE iritiw a2ess AG bas 


Parameters 
Nine integer. fone. of which Ais. astuetty 2 BCD) Meira dg jaca They are” 


(in order) one BCD name, four integers denoting, "from" cell and four 
LP O0Suose aT? odarmmoeo dah} to brow aleore so eb igen 


integers denoting "to" cell (explained below). 


Operation said es er Ps ene 
Reads a name iat g- MAY20) ‘and. 1 creates «file (named MAY20 COMMON) — 


which contains all of the cells from the cell denoted by the first set 

of parameters to the cell denoted by the second set of parameters. Celle dete 
i #508 obi 

are referenced as discussed in "Addreaping Coy n Storage 2 (mee pe. Pe 


above. This file will be available for reading by oPgs. 


Guide Lines i i ae we " Soi AMAWYS ; eee. Ray Wea 
FILE NAME OF COMMON. veer: eypae one. 8, yard, ¥ whic will become the 
AQiVBS duong iw bre tab any 


name of the common area file being created. It then types TYPE IN “BEG 
‘L,1,J,K, OR ALL and waits for the line number and (i,j,k) of any array to 
be entered. This is a reference to the cell from which it is desired to 
begin writing. One may also type the message ALL at this point and the 
operator will automatically write out all of present common. If one does 
not select the ALL option the routine types out TYPE IN END L,I,J,K and 
waits for line number and i,j,k of the ending cell to be entered. It then 
determines the location of this section of common and writes it into a file. 


Note 
See note following description of OP94 for further comment on 
OP's 94 and 95. 
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tof 9attw of ops Bg2 cna nite ot 3 919 279 James#4 3 
re OF ORE REED" Ugaion’ Reed cfm He 


pV S Ya RTWB, a ts ie oo: eas Ls On ‘ GMI. ar tay Py to qi 
ponies Prod as 
(aritri -ser’s tA GD 20L.T yag Towers 
Corkel se ida 2H) ATT OSE ME Bie 

Purpose 
Reads a file written by an OP95. Pong 
foatilssed mei PT. 4s AT ASYT 


Parameters . 
One integer (actually BCD) parameter. This parameter is the’name of the 


common area file desireds: e6 beivegey ef beyadea Jom A yo .i.h wad 


Operation 


Reads indication from the file referenced as to where to begin 
writing. It then reads the rest of the file into this segment. 


Guide Lines 

NAME OF COMMON FILE DESIRED and user types the name of a COMMON 
(class name) file. It then types RETRIEVING THE COMMON AREA and proceeds 
to obtain the file. 


Notes on OP94 and OP95 


1. OP95 writes indication (beginning location and number of words) 
of the source of the information at the beginning of the file 
and then writes the information. Thus OP94 can retrieve the 
information without knowing where to put it, because this infor- 
mation is at the beginning of the file. 


2. If common is changed (by extending it, for example) the file 
will be read into the correct positions so long as no change 
has occurred within the part which was written into the file. 
This should be made clear by the examples which end this chapter. 


3. In writing out an array, one cannot write out just one index 
(for two or three dimensions). OP95 writes out a sequence of 
registers. oe from KOP(1,1) to KOP(S, 3) writes out (1,)), 
(1,2),. (1,3): e.5- G,2),-G5,3); 
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Parameters are input as in the following example. To write out 
all of system common (lines 1,1,1 to line 14,30) we would type 
as follows: 


TYPE IN BEG L,I,J,K OR ALL (machine) 
l1i1ii (user) 
TYPE IN END L,I,J,K (machine) 
14 30 (user) 


Any i,j, or k not entered is regarded as zero. 


4.70 be | — 8/27/64 


op90: Print Common File. . . 


Purpose OP a.mgdah. ok ain metevierta@udtt moe wooo ap cs 
“ PPinees a ft le ereerens b¥FOPOS. ce teye ck bento ,Bene ee ee owg 
3 LS Pog: j 
Parameters 


One integer (actually BCD) parameter. It is the name of the file 
to be printed. 


Operation 


Prints the common file indicated by the name mentioned. The file is 
printed in reverse order (i.e. in the actual order of instructions in the 
machine, since the common area is stored in reverse). The first five 
words of the file are the L,I,J,K of the ending location and the number of 
words in the file. 


Guide Lines 

FILE TO BE PRINTED. User types the name of the common area file 
which he desires. It then types out "BCD OCTAL DECIMAL FLOATING POINT" 
and proceeds to print out the bed, octal, decimal and floating point 
equivalents of the word. (Under BCD any illegal character is printed 
as *). The routine automatically suppresses the printing of zeros, but 
it counts them and prints out the message "ZEROS: XX" (where XX is the 


number of zeros suppressed). 


An Example of a KOP 
To add A(5) to our common area without changing anything else the 
following sequence may be executed: 


OP89 (Extend Own Common) 
A,5,0,0 


OP92 (Incorporate Own Common) 
OP95 (Write Common Area File) 
TEMP (Name of,file) 

ALL (Paramet@fs of Common) 


*, 
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OP99 (System Load) 
OP94 (Read Common Area File) 
OP91 (CTSS Command) 
DELETE TEMP COMMON 


This first extends common, then incorporates this extension. Then 
we save the common area, reload the system, reload the common area and then 


finally delete the temporary file. 


5.00 


Chapter V 
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OPTRAN be Bivgttws AN Pu apur ies fgeed 


‘by 


Janes Ttnderman Ge RR Aas Ba See esas 
ho OYE, GP ee a ee bt ah eh crt eas a 


fhe OPS syste sinultenequsly provides -4 maied.and @ facility far .en 
on-line ‘algebraic programing language; It prevides.s seed..fior -algehxeic 
manipulation’ of. storage - with 4 nequinement-thet execution be concurrent: 
with programming. It provides a facility for recending.a prognem:as stt 
A MELEGOD end fer re-executing the programs oF SAY pert of ft» af will. 

OPTRAN is an algebraic language | Simitar | fo FORTRAN, which gives the 
user the option of. executing | as he As _Reogramaing, (OPTRAN is embedded in 
the Ops. isysten: and wae produced. tn. bess than ‘e:terw: o£ intermittent work. 
For this reason many desfrdbte tédtided nda ts WE Fee -£3e "tater addi- 
tion, and emphasis was placed ona :wotbiog , eaay-to-wee wer sion. 
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Description of the Language are Sa 


Although OPTRAN might easily include statements of every type pro- 
vided by FORTRAN (substitution, conditiona]. transfer, and iteration) the 
initial version has only substitution or algebraic replacement statements. 
The decision to postpone coding of the other types was based partially 
on ‘the existence of workable loop and: tramefer ior's tn‘the OPS system it- 
self, “A ‘limited vocabulary of dimensioning; ‘chearing, and:printing state- 
tents also are provided but mode :dadckerat tons: ne eee ‘COMMON 
statements are omitted. idoet @ ashiverg t)  vunhupeis 7: 


‘The replacement ‘statement {sof the form a= b with the foltoving ‘meaning: 

to 36 is the ‘variable ‘to be. ‘raptaded , sisudasela og ar far yr 

20 lb {8 an “algebraic: expression: séngidetag ‘Ofone or more vari- 
. i Jabhes andfor eonstaats >a ag ol 


-, Sequence by standard arithmetic operators: no. 


bo mary of Winery sGaddteien}o Soosia ese err eequn bo. 
- unary (negation) or binary (subtraction) 
multiplication 


* 
**k exponent iation 
/ division 

' 


(apostrophe) a convention for taking absolute value of 
the expression following 


3. The variables in the replacement statement may be of either 
integer or floating point mode, and may be subscripted by 
using the usual parenthesis convention. ANY arithmetic 
expression may be used as a subscript expression. Parentheses 
also may be used in the same way as in ordinary algebra to 
specify the order of the computation, and standard FORTRAN 
hierarchy is observed for operators in an unparenthesized 
expression. \ 


4. For the time being, variables may have only one subscript. 
To accomodate double or multiple subscripts the programmer 
must reduce the multiple subscripts to a single subscript 
by computing the appropriate algebraic function of the mul- 
tiple subscripts. For example in the two dimensional case, 
ARRAY (I,J), is replaced by ARRAY((I-1)*JMAX + J) where JMAX 
is maximum value of the J subscript. 


has been hatained. seh Gee 
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To provide compatibility with the OPS system, all of the COMMON9<' 


variables, ued. in programming, a, stangess. OF; have. berg: Breselinedcand 
appropr iately located. th Additional Common, BCOTage is,addocated, as. addjtional 


: variables are introduced by, the, _OPTRAN MAET si 4 be FORTRAN ,conysntion of 


f Eee 


: identifying ‘fixed koint v variables by 3 initial chazagter (hs doese aa s) ~ 


eae wee 


To dimension _ arrays, the Statement | : 


romgiBté & agtived ONG 


«DEMENSZONc . ARRAY1¢ISIZE1) {ARRAY 2¢IGVZE2) , 26 5 JGARRAYNE ESL BRA) 


3705 Soest 


may be used. Both fixed and floating Opokae arrays may be dimensioned ‘in 
thés.iway; butte sytbol a ARRAYS mosgrkotoRave jcowarsdd peavioualy, and 
the .variablés  ISEZEL ‘must be 1intagess,, [0OBhe SO 1ingSPel's -MSYMbe “Abnstaits OR, 


-unbike i HORERAN y (previous by! defined (integer s¢dr tables! fa 01 ich wese ERE! 


-. \surpent vdriebkescarezusedsi0! 0004 of babrsixe assed cst eye tcde sammol 


qevie alodgy2 BURMUD bisiugss di 

Spe commiltid Offer “etears ‘out Sti syupdis aoPited in PTRAN “an nd nd 

; ieee) 

thereby makes their values inaccessible. It does NOT — “COMMON 


r ay 


vavidbles of -the OBS System. .The statemelit 2teiaco> “noiteltyecu" 
i bro eho oe ayn ge of gape einftl gioi atuaneis di ud t juodae 
PRINT: VAR1,VAR2, ..., VARn 


“sesh to moebipbhsa sua ctew , seth AG 
causes the printings one to a prey) of the n var repice VARi, in zixed or 


float tig ode. “TE a “symbol “fs \midefin epeer°S 1ine ¢ to this "affect is printed. 

NO SUBSCRIPES ABE AUJOWER ad yetie::5Tkis its ia in tray athe ca and may 
EeAGT IVES ge 255 

require you to set an’ nsubscrtptéd edd Varta fe 5 EO Chie value of a subscripted 


o> Mar lab te,’ usd ag the replacement reteatemeut lbefore sr but Page TS 


fe he ate fragecmat Sow teil ciel: 3 & { VAITZ gi] ry bend 
* Sywibdis Way be Ho more than 5 characters ee tn "Length, % and are right 
adjusted with preceding blanks as in CTSS, but not as in FORTRAN. sols 


-~aiwilth, more than 6: characters, wil l-be tinkadted daaclag: only the drminal 
@ characters.:' Blanks gre dverydiere ignored an the systenmpor colsusice 


‘tintted étapnbst tee ate’ “Bivens” 2 LEA Cases Ue error ContcoL. ie 
returned’ to the ofS’ sydtéhn thidugt!" the Kay “eikry Pe point nodgeaes ees 
coverable cases control is returned to OPTRAN itself for corrective action. 


cal 


Use 


return to restore control £0. the. Ore system, 


necessary. — 


5.30 8/27/64 


-OPTRAN ts inittated’ Within’ OPS by’a’ cailts 0P20." OPTRAN then con- 


~ tinues’ to éall 0P20 itself, ‘untii”scatrtage return restores control to Ops. 


All ‘¥élevatit arrays, notably KOP ‘and ‘Ter, " are “continua ails | updated 80 ‘that 
a single ¢ali to 0P20 in ‘aodé' 2 ér 3 may ‘result in many ‘occurences “OF ‘P20 
in the KOP list. a eee 


OP20 invites a statement from the user by printing TYPE. The user 
then has: the option. of ityping’ an GQPTRAN: @tatemare, of (givitig’ a carriage 

ay. OPTRAN statement : seebeusiae: -te KOBZ:2PR,°DPR; SEPRj.IDPRy LKOF; 
LEPR; -LDPR, MORE, -NKQP;::JKOP;: MOP, . INDEX ér ;ZSAT: will cactuatly address 
these -commen : Locations, :aubgect :60 the reatrict oni of sone. ‘subscript - only. 
Common storage has been extended to 5000 locatéens; end ssyabols other:than 
the standard COMMON Symbols. Sliven @ above are added into common storage as 
they are “specified, 


"Compilation" consists of-ceustruction of a Rolish list; asdably 
about 3 to 15 elements long. This Aist is stored in modes 2.and 3 in the 
TPR list, with the addition of either 


1 a “blank word (oct 606060606060). to indicate, aes of Mate or. 


2... am dateger count of -the elemante ie the List ia ais ae a 
the actual elements following in IPR(LIPRt1)... 


¢ 


asi 


OPTRAN makes na distinction between modes 4 or: 5.) It either ‘of these 
modes, the IPR array is used for the Polish ligt, ef Recep Vanier is un- 


ra + BY ~ oe i 
roe ek oA ee ae <7] "Qe “ t ry aN re 
ee POOR Oh UST Re oe ae? id. ae ele. tL 


‘In execution moles, the Polish list ‘is procassed: and ‘printing: of! sub- 
stitution/modification' of storage: is: efferted. © + Since: DEMENSTONENG: 2S NOT 


A REPEATABLE OPERATION, repetitions of a. , dimension, Statement. Spring a com- 


pound execut fon result in no. operations. after She, first. occurrence... 


aaa 
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Diag 


:OBYBER: 20+ “aye Hearasoays fo gceabtsatdem. trove H 
23 icdoe Ys ctererjc) Sressye s: 
« OPA ETB OMS Jif T9 Ss 
dimensioning ‘ we 
‘acres scr oBRLEGAL DIMENSION FOR... Bi seieimeee afd Of anoitetetia i 
db naseiae gidawoil 


"XXXXXK' DIMENSIONED AT nieididi? 


replacement statement commilation 25iseosasib lancitiené oy 
cio die ree LEFT PARENTHESIS as 
4 ¢t mada yodto} 2isjosuade sbom-ysgedni anssuliiG Ve 


‘MISPLACED RIGHT PARENTHESIS 
THE SYMBOL x ‘PO MPO ARMM Ss tosis Suse arom Sansone 2 
cou te BOB GALLED -TOD ‘MANY, SIMES  ; ,eaeitarsso laoaakainbaé me 
PUSH. CALLED TOO MANY TIMES £6955 Vete™) 
printing agcligqisvedua sighilum eas 
XXXXXX = 0.annnnnE+an €1£ 000K is floating point mode) 
16d. ak acetisistis sidazrkesb [Ikte sud patos 
XXXXKX = nnannnnan (if EXREKX is integer mode) 
BRAD 0.0 9.0 6 al ce fi apd? eabtd bcs gool gattewqsesns of 


Ff SMART sO loligrea sp Ya aonsdotalar: avoorsslumi2 Pa 
Messer? SAASAOD Daysghaste ge to nolrnets 


saa 
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Easy altévatiotis'to 0P20 ‘as “it wow seeded otadbadey sel) vege. 


1. Different combinations of predefined symbols to “a#d¢domodate 
different common variables. nine eaansh 


2. Alterations to the sizée“Gk ‘symbol te¥idd}! Gnd /€dcHe maximal 
allowable statement lepgths 9s cavoransMid 'YXYxxK' 


3. Additional diagnostics Of “message e cemmed e SES Is fee 
ated THAs ad 1% Sat Gzu nee Bi ahs 
4. Different integer-mode characters (other than i,j, 
STRSHT SAAD THOT THOAI2] 


Somewhat more difficult alteratiene imelude: . ceive any 
1. Additional operations, 1.63;'‘extieeling 'thé-eperafer set beyond 


t 
tend 


(*,+,/, etc.). WOT? Y4AM OOT WLETAD neu 
2. muretie® eee eae tapes eee 
Ree 


‘Diggicult ‘but still desirable alterations ‘include: 


2. Simultaneous maintenance of a parallel FORTRAN file for 
creation of a standard FORTRAN program. 
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Conclusion 


OPTRAN provides the OPS system with an on-line facility for pro- 
gramming with simultaneous execution and immediate diagnostics. One 
interesting application is the creation of new operators. After being 
debugged using OPTRAN, a new operator can be added to the OPS system as a 
KOP. The introduction of a mechanism to produce a parallel FORTRAN file 
on the disc would also allow the operator to be added to the system as a 


standard OP, if this were more desirable. 


This empty page was substituted for a 
blank page tn the original document. 
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cojaye MTRI of 
OPSIM Se re eee 

B fledugmre “uo $96 wod te alarave ua «4 

by 
PU Me OHS, Jono doce? yd no vid Gieusiova me doa febom ods tohbis 
PBA Se Robert Wgheb, 9S A TBQMOD GS Sf Bovis). wut aasH 
BOG udG. «: ggitshtc add tad¢ aqevig ,favwa. vtrdeavel on 
Slow Ga $8 daugdenesr @f said os8el eda 
Introduction 

‘Garrent ecpenenal: purpose * slmaacion ‘[anguages guch ad ‘STHSCRIPT, GPsS, 

a2 sh VO 


and DYNAMO have made it markedly easier to build complex sfaataeion modeis. 
Although these languages were not designed for use in aobimenshavedcomr | 
puter, suitable modifications can make them compatébie withsa timexshariig 
system. DYNAMO and GPSS have already"béessmodifiedstiassuchia manner, but 

as yet these systems do not take: £G30caévanbageiof! stme«sharingpossibilaties. 


Specifically, .ppogranmer : interegtion with the sRgdg} during  executs 20.48.01 a al? 


very limited. .afoys| ope co dgow sano amis agnioncev 


capability permite, She, HAeR san dpbroce, wey gecheian,5p]¢4. 95. ings ote 16 to 
while. the.mode},is. rupning...0£ewen.arestng edsndfiranss 48; the fact, $Ret, qo 
the programer.canbytld his. podglpn-ling apd..teatnshe yardoue, Bares i®® ci 
they are introduced. .Thig.manner.of,. testing, a, model. permits the. pro- eargaaue 
grammer to consider gecetted aspects of his model at a time when he is most 
aware of the problems involved rather than Berei ng hia Ee a deat with tne” 

model in toto when many of the sane détal rarer irre ered by thee 


thweflot oda yd badbyoesb ed blios Jnsvs beameb ari: 
complexities of ‘che model. : 


Although’ it is ‘possible | to ‘godity ee pe elation Languages” ‘to 


Coos boaemab fa 2o sal sa Zo- GLI 
make them saree ace ives "We appears more promising to ncorporate ‘the 


funct fons ‘provided by these. ‘Lengaeges take an: stoping, oe Tine chntrol system 


such as OPS-1. oe rea ait prosent a method for accomplishing this end, 
ee ae ae oF ues ed sso 2'FO seaqtun tasge MI2gc 
the OPSIM system. qm | sd oels 2 IO sg: iets M7290 


feelumia sdt do etugtico bs1xrash edt Fo 


welsh, R. L., The Develo 
System, hnpubkd tego le Bre, “aRNORE 


Med tig PUNE, Py, 170 fy 49 0H ot 14 EO” 


t 
G odd vd beldmeaas ,€¢0f 237i anoks i3p19 9g0 
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The OPSIM System a 

As an example of how one builds a simulat ion model with OPSIM, con- 
sider the model of an order-up inventory problem described by Galliher.” 
Here the object is to compare the effact of “affferent "order to" levels 
on inventory level, given that the ordering is done once a week and that 


the lead time is constant at one week. 


A way of thinking about this problem is the following; Four distinct 
. = aes Ceo ee as i “ee Rae Plate ty fete PCR DENYS B Ce ELS at ae re i : 


events can be recognized: 


1. phace:.an order — 

2. -drawa weekly demand 6 hi at ei al 
3. report the status of the:.systemys.ec!s oo s4 o: 
[@i:¢: record-the arrival: of-ordered: goods... ; 


The simulation éonsists of iterating through chtd ‘series Uf- Bvenees ad= 


vancing time one week on each cycle. 


The séiregation oF thése events in the abdtemartddr “wuggests the dese 
of an OP to déscribé ‘each event nd the #ubsdduent caiebidddion df théede © 
OP's into a KOP, the execution“dt widen ‘would? be’ one“epete of the stimula” 
tion. ‘Those vartabiés uséd: by” mote than dre OP°%stth as! Livettory® level, 
quantity on order, ete. 6) are’ ualaemesote ‘in! Gobaba“Heotiige 


OTe B oes 


Although fhe user could program | ‘all of ‘the OPé ‘ment ioned above, it _ 
uF Ss mye BiG Ey Bes 


is easier to utilize certain Special ‘purpose. oP of, OPSIM. For example 
fife oe Qu fr S140 a 


the demand event could be described by the following OPSIM ope: Sneek 


_OP47 - to obtain. random demand from a distribution of Gesenee 
OP16 - to move the. value of, the _denand to OP51 . a 
7 ves Ee ohn Fy as zy sees as pe seg® 
eee - to perform the remaining dati tren necessary. to ‘complete 
the e deste iptton of thé’ co 
poe Wed pads a edageage a 


OPSIM iectal's purpose ‘OP's can also be used to baplaty. the accumulation 
of the desired outputs of the simulation. 


see Research 1959, assembled by the 0. R. Center, M.I.T., p. 231- 250. 
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Thus, when the ‘user has the appropriate OP's for’ Hts similation, "he 
begins building his model by creating the ‘opbin ‘contort ‘systedl, bop Porras 
which coordinates the’ execution of ‘the event ove, “tie Ubst Gonerdt te 20 
generally composed of OP's 14; 40, ae {BGR eek ate any" Kop to aE a 
terminate by branching to the cbiiedt “bya stem. “Opho perto, nis the ma for * 
funct ions df the -conetsl sper. Wier enecuted shi tite creat dé made: lit oi © 
request® that! the progtuamer Input the wumberto and times: off the first 2 feo: ; 
execut Low ‘of “all event KOP ‘si, arid visus thie cinforndtiion to cdinmitialiae ai os! 
list of #1! wcheduled furdré wccurrériews of thesd levdnt: OP's. It abags. 20: 
creates the OPt# ‘27 “ahd 116, OF 'e fer See re ee eg 


After ‘compet ing ‘the OP's. control syecea “tii enh fg OP40 “bi ene? 


create aac. "the ‘user creates the fivee ‘even e682 pn “Couitet’fon, ‘te’ °°" 
stores it on a simulated tape file. He ‘thet’ ‘Ecéated “34 “stores the “other” °°" 
event KOP's. To begin a simulation, the user executes OP40 in mode 5. 

OP40 will read in and begin the execution of the earliest scheduled event 

KOP, for only one KOP is in core at any time, the remainder residing on 


the disk. 


Because of the nature of the model under consideration, the events 
could have been listed on the same event KOP. Since in general the order 
of the occurrence of the events will not be fixed, such a simplification 


will not be possible. 
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To puild. a model _ Ain. which the lead time is, Propablisttc,, the Pres 


"O96 OCF @ba T9au art cach, ap 
grammer wold remove | the, arrival, QP from , the © ‘event ‘KOP and file it as a 
es Labe Om aid Ro 
separate KOP.., OPSIM, OP's. 47 an4, / 41 are “adjed | to ‘the original event KOP ea 
iF J9O8> a Gods Pop fh. 


to draw a lead Ame. from, a. diptribution and ta cause an occurrence "ee the 
HATE Wn widleucan rae 
arrival eyent.. at, the current, time Plus lead eines , ; 


YQ 40390900 60 o4 patdssata od ssee 


sos 


Similarity, 1h the:-ordering rule ware naw changed écou anlendin pack: 
a week to ordering at an order: peinti:.the nrder:: 0? wowksd leo he salen aa: Cane 
from thé event:.KOP iand would: be ‘esiecutied only ob€ the wxdeming, condition : 5. 5.-:- 
were satéefied. OPSIM OPts -13-antt 4 wauhd be used dn the -avemt: KOB ito. co: : 
testi for «tie -conditton,: aud co-ef fect: the emecutiton sof she vorder, OR. ec in 
when required. . In. the same manner » the programmer, .u utilizes the modularity 


iS moJayv “HG gmigalqmoo wots 


of the QPS- 1. system. ‘to describe, pther variations o of the model, controlling 


22 8G uo Sgatr bo 2B) : Sbom sdeewo 


the event sequencing with the OPSIM OP's, 


+e 


3427 S682 vetslipsis 4 re St snide 


of See de APB) Bhs owas, git ook: Meio Bs bwegel rar oa fay qetsare 
H dress i { 7 : 

Z ; Meo ' oe cer! arf » art te yr 4 6d : 47% Paah Was eat 
aS Pee diagnos SSE ENB G2 Fa seofoueoaesa of5 ree 43d Pe-5 yt! ipod ad ate ze ay 
| 
| 2 aebh bay aad sem fo awa d vis JB aren ut al GOR sua vino sot .SOY 
| . 

1 
H oo wis 
| 
i cas . e Pm ty 2 a | t ST YRft j * 
Yah Beg: : i. oes a Pe 8 SBR Sos no bekag! fie guemei wdinin 


iro Sideave ofd to sousyfaosn ara tes 


2 
b 
a 
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Conclusion 


The results of this research show that OPSIM is successful in 
building and testing simple mo@ela 1ike the! oft Brece@eed! Herel) It now !° 


needs to be used on a, complex problem... If,da.tbie,typeofigrokjem thag:;,. 


is hardest to test ne the current simulation langua uage, and it is here ; 
Bye! o Sd g9egucexs doidw IO sd: e90 


where the on-line Peporoeen | to bullding | ‘simulation moneas is expected to 


, Gy asit Ree: 


show its greatest advantage. 'svEiNIS AB AL auoeey ABET 
OPSIM will bés kupboved! dn: severed ways) 2 Ficat , 4tW1ild aetomatically 


incorporate improvements in the goyer.and cpnyenience, withiwhiek OPSed) 3: 


allows the programmer to Goneree his model. Secondly, it will improve 
judigiad OBST S mori weib 8 asadse doidw IO 9d3 Lvea te) 
from the addition: of new ‘OP 8 “which add more specialized simulation func- 


tions. Finally, it will iaprowe’ most! Erour wae?! As ptogtabihe?é? make usd?” 


of the chararkerishics.that.dt now.bade Shey, wild. disgowgr: things Shey'co xcs 
would prefer: tp, have: dene. different lypocdt; 40, tgpogeiblento forepeenthes sit in 


best way to organize such a system as this, and in many parts, SRE, Rest. gis sty 
way is dependent on the problem being solved. However, OPSIM is a start. 
It provides a general on-line system that can be used, experimented with, 


and extended. 
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OP's in the OPSIM System ee eee 


s Lue A290 sel wode Corneao: alAt te adiieoy ~ iT 
OP40... .- “(seb ig asco OP. for: the: systemon efosis asistod bos vabbitud 
oP50 °° * “bhhe! OP- whith: determines’ the pide’ oF anibidet OOS FI RY 
it ek iGsiuete Jasiavo ade ge e602 Of seubyas of 
OP51 the oP which executes the operation ca caused: by a demand | a 
ene PF givuems coal te Dom wie Bhitid ag AQBOIEGS sion GHD Sasa 


OP52 the OP which executes an arrival JSURUNBVbA 2eccseay edb wade 


OP53.-....,the OP:which prints the, .statiegics pf, a, eigubatdon: iy i250 


OP4143 °°: the “OP which’ causes “an event’ Rep 242 ci eanoweveiger stbicd 
img 2 .tebom ete Lorine o3 teameineaqg oft awolle 
Opa? She oP which makes a draw from a random distribution, og 0 NED se 
polesiumr. oostl stows grom bbs dotdw e°WO war fo aetarhae ons meq 


OP46. se, the, QP, $e, plot: frequency, distgdbugdeme; (ii ci oc) oii. anol 


Other OP'#°td eontrolakta tecation aid abVdedtt LoupPibe thi’ tendiaasy? 7 7° 
of the OPBIM-ayaten.° AL* the’ OP 6 be" psn! aba ttbtieid? si” edd “4A blues 


the Enon; By Helene at oVond ci bee ,erti ag metaya s dous ostrsgyn ct vaw Jasa 


we te Sh oe Be ME hv Pevdoe uoraec maddatwy «da co dvivit vqet ol ¥BWw 
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Introduction 


This. ‘haere! describes ; an. application, of, | the ops system ¢ to. », scheduling 
and control of a. project. pade, up, of, individual. activities. T The, objective _.. 
was to schedule activities in, a, way. that, minimizes pyer-all. project cost 
and thereafter to provide a facility to monitor project progress and when- 


ever necessary, to reschedule the remainder of the project. 


Six OP's form the basis of the system. These six represent a com- 
promise between flexibility for the user and efficiency in computation. 


Background 


The scheduling algorithm used is based on the critical path method. 
A project is broken down into its individual activities and a network is 
developed using these activities in such a way that the actual relationship 
of one activity to another is depicted. Each activity is supplied with a 
normal time and a crash time and a cost associated with each. The critical 
path analysis generates a series of completion times, each with an asso- 
clated direct project cost, which is a minimum for the duration. There 
will be one sequence of activities which determines the completion time. 
This sequence or path is called the critical path. The activities on 
paths other than a critical path will have float. 
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Although the first. project schedule, obtained, with. each. activity at 
normal time, will have the.lowest,direct cost, there are fwo,situations 
which render importance to the remaining schedujes.... First , a deadline may 
exist which is earlier than the first or normal schedule. In this case, 
we would have knowledge of the activities to speed up or "crash" to minimize 
additional direct cost. Second, a consi@ératfion of indirect cost on a 
project usually indicates a total project cost minimum at a project 


duration somewhat less than indicated by the normal schedule. 
tabdugierricl 
All the terms mentioned have strict definitions too lengthy te re 


include here. A good reference is gees Nokes on Geit¥eel Patt ‘Sete! | 
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OP36 


OP36 is a routine to compress the activities as represented in the 
data base. This’ is hecessary tb’ insurd’ that’ they tonkbtm to thé require- 
ments of the schediding’ elgortttim. "the activirteb' bust! be Vedeied by XU" 
and J and the modes must be numbered th dbertctly ‘editiehe tal’ indies.” “Thi's © 
means every number must be present: from/.ane to the mantieem node: number 
and every activity must have: a J: value: greater: than ited: salue. OP36 
takes a network numbered loosely and compresses the nadecmmbets aa required. 
Bee seaG Sek 4 GES 
This: OP will be: required: under: two: eitcumsteancestc first, original 
network input may be loosely numbered to allow for manual revision of the 
network without renumbering: the entixse: thing... Ror instance activities | 
may be: added... The: second cage wherein. OR36, wid lb de used te ee HOR 
automatic. updating. of 4: network by: OP40, Gliese? seel vfT JRO mb beanie 
Daye tas vin ra eeu thy ko Jo 
The original node numbers are saved for output to identify the 


activities to the user. 


eS 


“ 7.40 +. 8/27/64 


OP37 


att: Poursst ..h9G vo botetesss sls 


OP37 is, the scheduling algorithm. ze. “_pperatep on! the. network < stored | 


ep ry y 


in the common data base. 1 A schedule, PE project durations and, associated 


Joan gy 


costs for, crash, prograns. are. summarized and, printed. A, tape file is . 


created SpREesponding, 50,, each, schedule A Loa ee es 


2 


weet d 


> $4693 fendd oe soga Spe fh Ms asa tye 


“he “asheaut ina eigen tthe is i baeed on Fulkerson's solution to the | 


critical path problem. It consists of four sections: the flow comeutas 
tion, backflow computation, activity flow updating, and flow summary/ 


output. The logical sequence of program execution proceeds as follows: 


1. The flow computation is entered and a forward pass over the 
network is performed labeling each node. 


2. The backflow computation is entered and a reverse pass over the 
network is performed. When a backflow condition is detected, 
control transfers to (1) to attempt to revise forward flow. 

The algorithm iterates between (1) and (2) until no more 
revision of node labeling is obtained. 


3. Activity flow is updated according to current node labeling. 
4. A summary of flow reaching the end node on each iteration is 


maintained and printed together with the event time of the last 
node. 
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OP38 


For each schedule generated by OP37, there corresponds an array of 
individual activities with their starts, finishes, durations, and floats. 
OP38 accepts a schedule number and outputs the activity array corres- 
ponding to that schedule. To do this, a tape of earliest event times 
produced by OP37 is read and the computation is performed. The quantities 
calculated by this OP are not saved. The original activity node numbers 
are present in the output so that these activities may be related directly 


to the network diagram. 


peg A600 8/27/64 
OP39 pes 


OP39'ts cali#d the ‘iftiérface gendtattt tot! 1A OF better name. - 
It requests ‘a Schedule tibet (previbubly generate by SIS awd? a aaye oot- 
The day spec¥ftud ty THY Way on Wich’ yor deveteeibwied ge bE ACtIVIt Lee 
in progress. For the schedule specified, OP39 supplies a list of all 
actiwvitt feb ‘scheduled tbe At progte de’ oY Lede ae VE Chat Yay’,' with 
their durativhs' ak pektent Completes?" Bevh lel abby bet ivitiee WES t8boy 8 
possesé? Plbat’ and’ therePbre Aecway existe’ dr che tithe? Wen ah activity’ tan” 
be per formed) the tt oie sett tort VEeWwew ha wach? Acti ie! Scheduled’ at? - sop] 
its latevt? posdible’ Stet ting time °° THIS! MAGE that? 1 aby attivity dey! 19° 
behind 4h LeLaciow tothe’ intertatel generated tne Pid ject’ bi24°be' delayed |! 
and not€ihithed on 2thedle® ~The Tnteredee Veh Ghly(be’ tetined) YH? 
certain cases, by the completed activities Co) cH@™ le #27 UP'the? imtebrace «° | 
as well as those scheduled at that time. This is because the position 
where the? iatetthed passe? a: chain! ofthe" hetWirk afi be" E°Hoat' of Gh 
actilty rétheb thaxthe aceqacpWehedhled 12GG1F and theketote) ho os 


oOdlg iw mens ad 


activity on that chain would otherwise appear. 
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This.operator performs the, updating. .of @,prpject network at anys. 
time during the actugl project. .[t,, dn. effect, comates, a, mew project... 
network. representing. the, remainder, of, -the. project fram; that potnt.. boil 

The firer tiforsatipa. ops dgtumste sea: age pened On: which Lo nike. 
the updated: network... This, should be, greater than twenty, 990-98 pot: tq. cio /: 
correspond, to a schedule..output: tape... Next,..a, description of, the interr, 
face currently existing, bet een completed. activities. and, nonrcpmpleted . . 
activities.. Five, pieces: of. informgtion,about,.each, activity are. required: . 

1) the tail mode, I;,2) the head node, J;.3)., the, pew; estimated, norma) time, : :.. 

to complete the, activity;,4) the new, crash time eptimated;,5), the slopes, 

i.e., cost/day to shorten, from. (3) to. {4). -. fuss aras odd PA jokes eS 
iMG sear deh ot Pee b@ASe Sugai cr 2 

With ¢ this information, a, new. ome a apiiagh ie bringing, all, 
the specified activigjes. together to, a. common, starting ;node,, 4. tape tite. ee 
is then written. 
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interface between activities scheduled to be completed and those not 
saloon of gmne 
scheduled to start as yet. OP39 was executed on day 13 and reported that 


activities 6-9 and 7-8 may savege be in Progress but all those ee 
to guctue bee avant sda atetteslil as bebslont ak mate eb. 


should have “been, completed... Agsuming the Prodest. 5 be, behing on “day ik Seen 


To Piso 2LR0 2B woiecye an 


and in need of rescheduling for possible reduced extra cost, QPAQ was [io ieviic 


execuree to reschedule the remainder of the project. New data for activi- 


Coeds sou Ve “X dosha ine buifen od ifie medsefee dusi aye ont 
ties 6s 9. and. were 5: 1 , wa is executed to cryes the new | 
{7 Be ¢, supp) AeA. « OF 36 os a LS o Pcasta gt MAat foot yot tloum o2 
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Aut omat ing the Exchange 


is ae ToS AROS ADNTS UaeAsHOTUA i 
The most difficult task in automating the exchange is the programming 
of the specialist function. The bookkeeping part of the job is conceptually 
comparatively easy. The specialist”, however?” hoe only has to bring matching 
orders together, but he also must set a price and decide how much: stonk, te) 


offer. His decisions, are, ,baped on, the , fojloving variables : 


i an iwc fled oiff 


Cowal Gf BA ooge tuac viyaluobsied ef tedtore aedanont? 


Ly. The Book,of outetepding orders 


9G { Ma Beg WOR Jf Sh Oh TE oy OAT 


a‘ ~ The. Particular. stock's frend vadyee eboyo eo be aarite ee usdore 
_ Fhe. specielist’ 8, SURFER t position, FS PU GOS aft 


meus “his adatc tt Jk 
It, re alee conpetyable phat, Fhe spectaliat pay, went 9, consider, dots wl 
Ce koe @P OGta Sede SaidG .aduate Give xo sed ano . teva: sc 

... ,The tir rk 
the en 2A &, a ef : trend See 3 ghom Irreqeas .edn bes .engogs 


te afoitonms.: saecs snotieg 
° The particular company status 


4 
5. The, generat ppsition ¢ of. the, economy 
6 
7 External events. 
These last four variables are conceptually different from the first three 
in that they are external to the market. It may be that, except in excep- 
tional cases, the specialist should let these influences work themselves 
out in the daily trading rather than let them influence the mrket directly 
by changing the decision rules. The market should reflect the general con- 
dition of the economy and the particular stocks, rather than having the 
market affect the value of the stock by a change in the market mechanism. 
The programmed specialist would consider the three variables in making his 
decisions on pricing and amount of stock offered. The resulting prices 
would then be tested to see if they fall within a certain tolerance limit. 
If they are outside the limits, the operator will have a message typed 
back and he can either interfere by setting the price himself or allow the 
price to stand. If the market is affected by an external event that would 


cause a run on the stock that the normal decision rules could not handle 
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thesoperator could intervene by changing the parameters: of the decision 
rules themselves in ordér to insure an ordesly drop or:xise: in price. . This 
gives the operater ‘the: per acae -affect -individualh + rdmsaction iprices and - 
price: decisions ‘in general... 26h, ee aye oiugsege at 

The computer also .wust consider: tha positidn it has taken in the market. 
As mote :and more is invested Jina particular cstdek the point ispread will: 
probably grow wider as thesspecialist is forced tansithdraw his support: 
The emphasis should be onian orderly declisetand the capital behind. ‘the - 
specialist should -be “enough to dusdresthts. (o£ the ienount thavested is 
greater than’a limit etther the market will heve stio:he tenporarily closed | 
or some fora of human interventiion will bé mecessery. 2: - 


Ry insuring hah atl decietons are made according to. standardized 
procedures any conflicts of interest will be 2 minimized. | Of course, every 
time the Specialist enters into trading . some . gontlict . 98. interest will | =e 
enave but it will Re equally Likely fo, hapuqn.tq,any,cuatoner.. This 18 the 
price that must he Paid for a continuous stable market. . The computer, will 
not try to make | money. other. than» the difference, in, the , spread. | This should 
eliminate the prime, conflict of Anterest since the computer | will not be a7 
prevented . fron. taking .a. position when necessary. due to self. interest. _ The, 
amount earned an the point . spread will probably be enough to cover losses : 
and costs. If it is not, a commission can be charged on all ‘transactions _ 
over and above broker's fees. This ayarem will not allow the use of not - | 
held or other discretionary orders, but all “other. "feéfuding market , ‘stop- 
loss, “Lamit, ‘and possibly stop- LimEe ‘orders: “Eould be handled. = 

s'Seilerosqe 7 

There are two primary objections to this system voiced by the New York 
Stock Exchange: 

1. Who will bank the specialist? 


2. How can a computer be programmed to meet all contingencies? 


SR PRB SR ER ty eR te OSE I oe in et gs ro 
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In answer to the first question; there is no:doubt ithat this scheme: . 
will entail a thordugh reorganization .af :the apeciabiat funetidn.. Theesi.: 
exchange will probably have to bank each sseparate .specialiet:.fer each «2... 
separate stock. The operation will be, like the .dxckhamge -it aebf ; ia non- i: 
profit operation. There is no doubt that short run profits and losses 
will be made, ‘but. these will .be. programmed ‘sa: ‘they: even joutim.the Lofg 
run. Funds for the original capital. investment seed not -be sneatsed able: 2/ 
at once, since the exchange could ‘gradually :convert: ithe individual markets . 
as specialists retire, with a-deadline on conversion of a1] markets: €ene! 
tainly the amount weeded:to back the market need pot “be tod ilarge, since .;: 
the requirements for specialist investmentare, at present:; ‘very lows: 2 351% 
Eventually these requirements would Have to :be reised im:order to previde ™.: 


e 


adequate stability. 
The second questfon is parttally answered by providiiig human tnter- 

action with the computer: “However, ‘as I°daid Beforé, it ‘fs not absdlutety® 
clear that this feature ts ‘divayil desitdbte Sitide “thie ‘warkét “shovld reffedr 
values, not affect them. This t# ‘shown by ‘trie Hiténse distizé of abe 
connected with the exchange for any’ external ‘cénttol “dvér ‘theft ‘market. ' * 
What they don't realize “is that the specialtat, py “empioyitig RLS know-- 
ledgé of the outside world, is affecting “the Vansibée “GiCectid fy Winset#"" 
What I propose to do is to affect the market by corisider ing” ‘oultstde ~ 
influence, but do it systematically’ ‘and With ad inition of externa’ ‘influence 


and personal bias. ode 2 Csuiine tom ei 3: iif fo kee 1G Te 
; races res at cada: pao 
Note: The following ‘operators were the first ones 28 programed, ‘and form. 


only part of the operator set as of Auguet 1964. he, set is. being | ex, 


Le Yo 


panded to include the specialist's function. 
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Description of Operators 


“This opérators is diways the first 6ne ‘calfed “in the Wyeté. It is 
necessary to et ‘up 4? iceman rnimber generatér “fo et ‘to 
operate: in'a ‘réndonimannér.” Tf ‘the user‘ weihéed Co Meve tHe Tist of 


operators’ available, he can Gaia cela ak ‘eéturt efter the condoté eee fd 


back SUPPRESS: tT. Sopp eh Te : PusawEOoed Soe te oes BU BR 


O42 = | 


This operator sets up an. acistaisiae a ALSEX,», » tae sendeates ner, = 
only wae Enis qperator, ence swaleRs he wishes.to pave several accounts. . 


some ieocia: bie may cies chee to his Benicia its will se oe in his account. 


He does this by specifying the number of ‘different types of stocks he has, 
then the part icula® ‘stdck ‘nutter “and thé “cOfida pend fig “hunber ot ‘Mares. 


Thé stocks “are ‘entered “at the ‘cthtrent “narkde peice ati? ftom ‘thew dn until’ ~~ 
they are sold the ‘computer ‘keeps track 6f sitefy név capttal gain (or Lose) .” 
The user can inquire at any time what his gain (or loss) is by usittp OP4). ” 


Only six accounts can be kept at present; put this will be extended. 


OPA3, G itevda 


_ This operator will give the current market price of any of the tem ~~ 
stocks listed. The user merely enters :¢we stock number and the price is 
returned to him, ah aa 
COR ace oh stad as SEN 

“This operator gives the user the currem stutus “of His portfolio [°° ~ 
including an ‘Envéittory 6f the number of ‘shetes Of Gach Stdck,’ the price © 
at which the stock was bought or the market price at the time he entered it 
at the broker's office, the present market value of the stock, the net 
gain (or loss), and the number of shares held, Then his total original 
investment in stocks, his total present worth, and his total net gain is 


printed. 
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OP45 


This operator enters in market orders to buy certain stocks. ‘Ina 
real market, these orders are either filled by the specialist or by his 

book of outstanding sales. When the market order is received, the program 
transfers to an, update routine. . This noytine detergines the market price 

of the stack and. executes the order...The market prige.ia determined bys... 
random number generator..bich is.modified bythe bogk.ofcutatending limit 
orders (see, OR49), The price of market .qrders ta determined ag if.a... 
specialist picked a random price between the highest price of an order:and... .: 
the lowest price of a sale on his order book and executed the transaction 

at that price. If the price he picks corresponds to a limit order, that 
limit order. te dlso exdécuted.'° The ‘operatér prinés &¢ confirmation “of ‘thé 
order, the purchade’ price “aid ‘total “adiount °6f ‘the Soffer’? FE“also prints 6°" 
the user's ote account nee amount’ Leda “Comitteten! aid new Bwlance: 


SPSS OE SeEeye aot Sanne ote ay WE es Sea VE Ean Be, BMG dA 
P46 ; 
an Pars: = “t orien get ank s ‘i wa aay 


This, operator, is ach the, ; 8AM, -As -OP45, anceeh A aged ta axecute 
sales at the market price. The price is determingd the .seme, way as. in QP46.. 
The gperator printa the sale price, the proceeds .of the aple and the user's 
new balance. | fas Le Go Giee ely als ane ee ER Mee) ate seat 

1 ORGP ety Sool gu und ¢aarae 


This operator is used to obtain prités on all ten stocks in the 


market. : a ee ee ae en ee 
3 . a eT er 7 g ebm DPE aes ose 
OPG8 Le oui YSEo 


This operator is used to deposit or withdraw money in the user's 
account. If the user attempts to purcha#e a stock and his balance is 
insufficient, he will get a message back telling him to deposit. more money. 
His transaction will not: be congummated if hig balance. is, tep.dowe, © ion) 


wzeou FS 
t a a t 
a. a4 
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C tied? 


OP49 ee 


This operator is used to enter limit and stop~loss orders and sales. 


The user sehtera /his-sccountcnembéer,2the tdsber af ithe atock :toche vhought 


or sold, the .pumber of shaves sto :be:-hougbh sar ssold:iand-the sptice sbaye.5 |: 


which or below which the transaction shquld take place. These orders are 
entered into .the specialist's book. As soon as the market price goes 

above or béfod ‘the triggering pricés tne dtacte a8@detWatéd Sad “éxédilted 

at the triggering price. The book is updated each 24h@°tHé mark&de “perée °°! 
changes. The market price will change gery time one of the nine opera- 

Fore gre yas, a0 che specialist sluays eqgs ds wbeok undated... 4¢ 29am 


as a book transaction is leted the congole will type a message 
oa crits cd a a ra %o08 a9 nf enolssea TI VOB $4 BS a Oo 


announcing the sale or order and the price of the transaction, plus other 


information on number of shares, new Balktice, etc. 
( 


‘ r co cette get. OSE Fy apy one aS ae ne vs 
MP ML stake & te Tabyo as th WO vd ols. ig sZo 
otit sad Ofog esi) aokbrq ost garth Ao too 


mx pearic. 
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Other Subroutines 
UP 


This subroutine is called by all OP's 42-49 and is used to update 


all the prices of the stocks. A random number generator is used. 
CL 


This is called by update and it drives the clock by an increment of 


time each time it is called. 
CH 


This is called by update after the prices have been established. It 


checks to see if any transactions in the book should be activated. 
OC and SC 


These are called by CH if an order or a sale in the book is to be 


executed because the price has gone past the trigger price. 
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General Comments 


This program is realistic in its method of handling limit orders, but 
not in its handling of market orders. When the market goes above or 
below the triggering price the book transactions are activated as it is 
done at the stock exchange. Market orders, however, are determined at a 
price somewhere in between, or at, the highest book order and the lowest 
book sale price as is conventionally done, but the actual price in between 
these limits is random with a factor added in proportional to the number 
of shares bought or sold in the last period. This of course is purely 
arbitrary but it does give fairly reasonable looking prices. Market orders 
can be considered as being bought by a specialist at a price that differs 
by a random amount from the last price. If this price happens to be 
above or below a triggering price the book sale that triggers the price 
is consummated at this price, however there is no reason to assume that 
these two transactions were an order and a sale with each other. All 
market orders are actually made with our omnipotent specialist, and when 
he decides the time is ripe he will trigger his book orders. 


Presently, only six accounts are kept and only ten stocks handled. 
Obviously this can be extended. For each user, both his stock inventory 


and his money balance accounts are continuously kept. 


This empty page was substituted for a 
blank page tn the original document. 
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written within the framework of the OPS-1 system. 
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Description of Operators 


This OP has two different modes of operation. 


A. Simple polynomial regression. 


The user specifies the column indices of the independent and 


dependent variables, and the degree of the polynomial to be used. 
Results are printed’ out as the equation répteseheing’ thre bese’ #02: 
addition the RMS deviation, ana a’ ‘wéaaure” OF ae fits ia 


“33 ima 


printed on line. a? AS Lp wasting ot 


_A vector of, weights may be Specified i if the user wants to be 


Vale oOdnoeorgey Hi 


sure to fit certain points better than others, The final curve is dis- 


played on, a. cathose-ray, | tube to help the user develop ry “€eei" ‘for how Ee 


2338 OER TRY pores 


the curve fits the data, where the large deviations oscar. etc. 


2 Pe en A Dy, Shey sake ee as 
Pastilsas coved: zak 


B. Multiple linear regression. 


The user specifies that vector K is to be regressed on vectors 


I through J. The regression coefficients are printed in equation form. 


‘No curves are displayed. 


Sy ee oo 
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OP28 


a Coe ore i bahi 


ong asiees: the waey. 0. speci hala ae broad. elece. of rts 
transforms,.60, any twa vectors.tepredune 4 tiled vectgn. The transform... 
is of the. Spr Ey ARQ, ). + BK, whene 4 fe the. index.of the new. columns, . 
A and B a: constants _spectfted by the user, A wheat of seven transfor - 


mations, aed e and k ¢ are the two transformed vec ores deceatorgations 
proceed element-by-element, and elements my fe chosen selectively. : 


The seven transformations now available are: 


1. Addition 

2. Absolute value 
3. Square root 

4. Multiplication 
5. Division 

6.  Exponentiation 
7. Logarithm 


OP28 also provides for the automatic entry and use of two standard 
vectors: the vector of all ones, and the vector of consecutive positive 
integers. 
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OP29, OP30 


OP29 is the principal means of entering and changing information 
in the data array. The user can print the contents of the array (com- 
prehensively or selectively), edit the array by rows, or input data 


directly (with or without echo check to verify correct transmission). 


OP30 provides for storing and retrieving all or part of the vector 


array in a permanent disk file. 
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OP45 


This operator can be used only with a particular display system at 
M.I.T. The basic philosophy is straightforward, however, and could be 


easily implemented on any digital display device. 


OP45 displays as many points as there are rows in the data array. 
The columns to be treated as x and y are specified, and the OP calculates 
that scaling which will ensure full utilization of the display arrow. 


The points are then displayed. 


Bair wed a ee Pe 
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Example 

As an example of the application of VECOPS, suppose we are inter- 
ested in simylating the qneration of a -metnopgligen.trangpostation: system. 
To do this 46 is mecessary,.to have. some, idea ofthe wErivelurane SS 


people at, say, bus stops, ,. Assuming that. sthe,agrival process in; Potssen, 
we want to know now che “STSras® arrival rate changes dux tae a eyptces day. 


mete argadds: 7 eek pt rte % “Ppt Bt cade zs) i te 


wf 


‘our experimental deta, consists of &,.8er 468 Qf ,ahgexpetions,of ... 
hourly arrival rates, 80 We, have -Ewo vegtor, . of. ,lnfggmation: . eeee lis 
contains the hour of the day, and vector 2 eontaing the umber .of ;.,, eel 


arrivals since the last hour. 


We can now use the array processor to select a suitable approxima- 


tion for use in the model. 


— 
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The data are input to the computer in the following form: 


Time also gied 
scied 6 a.m, ug! 
Re pee 
oe 60 
9 300s _ 
10 - : 
= 25 ) 
12 20 af 
13 a 
14 18 we 
: 15 en 
. 16 = Si 
3 ee 42 
| me 45 
i¢ 34 
20 ko. ee fa 
21 af acne 22 
22 on 
23 : i 


These data can then be plotted, using an OP4s, to viata, a | display 
thich looks like the accompany ing graph; The appearance of the-pothts 
suggests a 4th degree polyneital £1 fit. Thig fit-te-then applied with OP26, 
yielding the oquat tage - 


g MaED ONE eamremmDr ert A a NMR ee i TT: Fem RR tt at nee 


Tye 3 OLE5X + 36527 £12.98x" + 109.5x - 304 o 
ab the best 4th degree fit. The RMS deviation is 7.1 


Raising the degree of “the fit to 5 affords little reduction in the 
RMS deviation, further indicat ing the appropriateness of the 4th degree fit. 
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Chapter X 
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AN: ACGOQWNTING: SYSTEM WEFWEN ORB 2 ye clowns 
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PO ots By: a. Supe ofS YadePesseo sin dotdw 
The S03 Ades ve Oo Ged diets, agdven bof) ais 
Gordon C. Everest oo 
‘Gene pe ODPM VOTE mad lat Peo gabe a GTB 
Stig fonts tans fay do here oad chomtaan vodetued cry omeoto 4. cit 
NQOatewbocya Bis tna are 


Traditionally, accounting has been a process of successive 
aggregation of data to present more and more summarized reports to 
management, owners and the goverrment. It should not be necessary 
to maintain a relatively frozen, hierarchical structure of reports. 
Ideally, we would like to maintain the identity of every single business 
and financial transaction of an organization. The information associ- 
ated with each transaction would include such things as the date, with 
whom the transaction was performed, what tangible or intangible commodity 
was received and in what quantity, where the transaction was performed, 
for what reason the transaction was performed, and who, in the organi- 
zation, is responsible for the tratisaction. 

By performing the accounting function within a computer system 
it is possible to achieve more timely extraction of information, The 
input to such a system would consist of initial levels of resources 
(the Balance Sheet) and a record of the flews of resources through 
time. Interrogation of the data base could take place when information 
as to levels or flows is needed and not necessarily only on a periodic 
basis. Within the 9PS system it is possible to achieve great flexibility 
and open-endedness in the construction of operators to extract information 
from or manipulate data in the data base. With this facility there is 
no end to the way information can be derived as to the flows and levels 
of resources within an organization. 

In searching for a concrete basis from which to build up an 
accounting system within $P5 I decided to use my own personal code of 
accounts. For three years I have been keeping a detailed record of my 


income, expenses, assets, and liabilities and in that period I have 
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developed a very useful system of accounts and reports for my purposes, 
which are essentially the same as for an organization, In this way I 
am in a better position So evaluate the uses of the resultant reports 
and to suggest possible improvements. I can vividly recognize the need 
for a change or further information, and I can experiment with new ways 


of presenting information. 
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Data Base fasts. 

Since balance sheet items ‘représent ‘resourdé' levels it {# edn- 
venient to-stere the amount sin a+oneiédmeridiotal drray with an’ attached 
list ‘structure for stering subsidiary information. By ddtng this we 
recognize that. some accomite-or resources de not Lend -themselVés < to" being 
categorized. according ‘to ‘the same dimensions as Others: “For v’exampt dy - 
accounts receivable should be troken dowd ‘by tite nane-of ‘the -debto? “and, 
further,. by the date of the transaction while e°fixed asd6@ dhéuld possess 
_ puch information as. date of purchase, estimated Life, estimated “scrap 
value, amount of capthal wepaiirs or addittone, amsunat of ‘apprdcLecion, 
accumulated depreciation, and the nature of the asset. 

Since income and expense items represent resource flows it is 

appropriate to store these amounts in a multi-dimensional array with 
the dimensions consisting of objects, purpose, cost center, and time. 


The data base specifically consists of the following arrays: 


DT (10) Words which may be used for the temporary stor- 

1IT(10) age of both fixed and floating data in C@MMIN 
Storage. 

BS(3,10) Balance Sheet accounts - up to 30 classes. 


PL(3, 10,10) Profit and Loss accounts matrix with 30 object 
classes and 10 purpose classes. 


LS (300, 5) An array within which a list structure is set 
up to store data which is subsidiary to, in 
-support of, or te further break-down the 
amounts contained in the Balance Sheet items. 
It may also be used to store P and L data 
pertaining to past time periods. 


Sabsidiavy List: + 
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stig oto Fiou jeyb? adit vd wotuied Cp, ijel 


Each cell within the list structure codstate of five integer 
fields iatd, at-pregemtl) deertevate 300 wells defilwe? but this de plrely 


arbitrary. 


iD 


NAME 


DATA 


POINTER 


DATA — 


list as follows: 


LS(1,1) 
| LS(1,2) 


LS{1,.3) 


o¥ ASI 


Contains the Balance Sheet account number which 
is negative for the first cell of a sublist. 


12 alphabetic characters made up of NAME] and 
NAME2. This will be the name of a Balance 
Sheet acceunt er of an account in its 
subsidiary list, 


If the cell represents a Balance Sheet account, 
this field will centain the pointer to the 
first cell in the subsidiary list associated 
with this account. If the subsidiary list is 
empty, this field will be set to zero. 


will point to the next cell within the same 
level list. If this cell is the last one in 
the list, the poiater will be set to zero. 


If the cell is in a subsidiary list, the data 
field will contain the amount (cents = dollars 
x 100) which is te be associated with the NAME. 
If this ameunt goes te zero after it has been 
updated with a transaction, this cell will be 
taken from the subsidiary list and returned to 
the List ef Available Storage (LAVS). 


When the system is initialized all celis should be attached to 
the List of Available Storage, through the use of @P23, The first cell 
of the list array [ LS{1,n) ] will always contain pointers to the major 


pointer to the first cell of the ACCOUNTS LIST. 


pointer to the first cell of the EXEMPT ACCOUNTS LIST. 
(those accounts which don't have a subsidiary list) 


not used at present 
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LS(1,4) pointer to the first cell of the List of Available 
Storage. 
LS(1,5) contains a current count of the number of cells on 


LAVS. 
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Subroutines: to: Operate en: the tet soleccug © 2h griwiss 

In order to facilitate the use of the list structure a setisiouus” 
of 12 subroutines have been written: (1) to search the list to find the 
location of a cell according wa Bie tar thod of search - 
LOOKA, LOOKN, elgg ‘LCLAST, LLASIN; (2)! G6ssbdify the infermetion 
contained ‘in a cell -- - ‘UPDATE, STORE; OF Bina the strisebure of: the 
list by adding-or deleting. cells.-- ‘DELETE, ADDCEL,| REGSUB; % Had. £4) 
to -get cells. from-or put celts: onthe: GLAVS -- GETCEL, PUTCEL. ° \ 

in ‘the calling sequence of- -eaeh-bubrout ine are the folowing. 
dummy variables: (Those which are assigned a value _by th the cubPeut the 
nave. ‘uaderlined -- they/4ephesent. buk pit trot phe’ auBPEt ines) < ‘. 


N Indicates the major list to be dealt with according 
to the order in the first cell of the list array. « 
(e.g. ACCOUNTS LIST: N= 1.) \ 


Ig a current account numbers 


SC a ihr 


< AUMMEL, < The: our ea Beisadt eaies 


DATA The current balance in the data eld of the addressed 
cell. * 


~~ 
ag 


The ‘amount to be added to the data field.” 
Thé: locet ion of the cell being currently referenced. 


The location of the previous cell which points to Lgc:, 


2! <The Locatton of Yat icheadlcy- eet 2044 cha saccoumes Lise © 
which point sto ét-ckti-of #-subsidtary- list. 


The functioning of each of the list processing subroutines is described 
as follows. Except for DELETE which calls PUTCEL, and PUTCEL, which calls 
STORE, the subroutines are independent of each other. 


A 

Lc 

LCP 

LCL 7 The location of the last cell of a als ane 
LOCH 


LOOKA (N, IJ, LC) 
To search the major list designated by N for a cell which has an 


account number equal to IJ. If the search is successful, LOC will 
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be set equal to the location {nAthé arzmpi of / GNevcortespexiding 9): 
celle. If the iseavch is unsuccessful; £8 othes: wotds, sacceunt’ number 
old: doesn'2 -axist aki aap tad DEC Willofd set ita :zerd. 
ere Luogee recs cag muda ,b0u.- * FAS 
LOOKN ie wea, NAME1, NAME2, ce) ebediue tin: me ety 
To search the subsidiary list of L@CH for a cell which has a NAME 
equal to the name represented by NAME] and MAME2, £0 the seatithids 


. suecesefuls LAG wink beiwet ieqaah toe. the Jedatton of the comesponding 


, weble df the search ie tmeuscedatiu bh, in ether word s,: sie) ceki: 
within the subsidiary diet: canteindd sche. mand MAMED-HIAMED: IGC will 
be set te:-@ergs; 6.0 G42: or eer (> WEE TY cadadh edb baci 

, oe poe6t bee a oh NBE Fb cen od Pfiw 
LCPREV « one Ny aa . cacitegvw ofoanmi. @99 oj, 0 Teau att xan Liaw 
2 Ta find the location of: the celdi whitch points! te gs eee oo 


has: one; and enky. one tiehl pointing ite dit, df the beerch' isi successful 


. LGR will contain the docation efithe priebiboum cedd oo Lf the Bearch 
ip unsuccessinl » LOCP wikli be :sek: toizerpi: of2)i] wiesbiadue 6 


LCLAST ( N, LOCL ) 
LOCL will be set equal to the location of the Aasfeell oan Lhe dGA 
Majer list designe ed: by N.d* aah ae eee df the spetified 
major list is. egaceiia Holger oe? ant eat JQGT Mo yd uoetangdeo) 


hos me Pe See ee Pe Ne : * yak y " 3 iY. pt BoP ace: 
widietdige Brod fant gt Aah LS alba hb EM i eoiad 


re. 


+ r 
ur A r gare ae sie 


LLASTN Le Ne Ids APGb d- 
To find the location of the last cell of the subsidiary list of IJ, 
and assign it to LOCL. L@CL will be set to zer6é afithedeadbpidteaze 

_ list of aeceunt:iJ:is: empty og: if. aceosat. iditoedi sot appedroin 
abhe.majec- ligt Ne cu JAE be obi gasgt afd ton on bas HOO 
SYSgur Gayo au bbudergediies ald 

UPDATE ( LOC, A; DATA ) 

To add the amount A to the DATA field of the cell whose) $dcatisati9 
is LOG. --DATA will contain ‘the :new! amdent vuinothe:détarfieid.oi 


: 7 . an eee nt oo A Shes OS 
2° 3SR TGS RT SIG Gsh gay GTR egu Das ue hsdss 
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STORE (€:16C, ID, NAME], NAME2, DATA:) 5°20 5 Gs fF en 3 
Te store information in the! first é:fields-of:the cell whose: 
location is BOC. ‘If TD *-lgior :MAMB1:9:-1; de: NAME 2:8041, ‘or 
DATA = -,001, then the pac areata field in the pencenee’ cell 
will be left untouched. Pol) MMAR GM AA 00D 6 + Wuthd 
DELETE . ¢ Lac, cs TSW) 8 ee ba dees wae 
- To. delete the:cell whose addresy is aC fron the. list ‘structure 
and. update the appropriate pointer:asé cell ICP. »:It iis possible 
te: attiept to delete a cell representing at Account wiich has a 
subsidiary list. If ISW = 0 then no test for tite ‘cond itton 
will be made. If ISW = 1 and the condition exists then this subroutine 
will ask the user via the console whether or soitihe wants to 6 0-4 
{ . garry out. the deletion, | Ufithe debstion: isto: ‘be carried out then 
-uail the cells in the subsidiary List wit] ‘be returned: tothe LAVS. 
If) mot,i no. action: widi:-be taken.) L6 the cell: Ig0ids the ftiet of 
a subsidiary list, then the minus sigh willbe meved-to the first 
field of the next cell. | 


ADDCEL: ( LOC, LOCL, NN). - 5 Rie satin a8 at gd Paw o) He 
To add:a cell whose: location ise! LOC. to: the: emk of the major: list 
designated by N. L@CL is the location of. the:fast: cell’ in the 
major list. If LOCL = 1, then this subroutine will serve to start 
a major lists Also, to add a cell to a non-empéy%gubbidiary 1ist.- 
BEGSUB) ( L9C, LOCH) se “ig ehigt QM? CEA Gs eh cia 
 Toibegin a subsidiary list. for the acesunt! Fcuacaweueea by the'cell 
‘LOCH and to set the first field of LOC equal té the!nagattve ‘éf 


the corresponding account number. 


GETCEL. ¢ Lgc: d= wee : ae SS eke! ATR Be AY 
To. get ithe ‘location of: the first-celk- in: ‘the List ‘of ‘Avatteabte 
Storage and update the appropriate pointers.- The LAVS COUNT is 
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decremented by one and then tested for zero. If the COUNT is 
found to be zero then the message 'LIST OF AVAILABLE STORAGE IS 
EMPTY' is typed on the consele., This message may occur if the 


LAVS is not initialized prior to its use. 


PUTCEL ( LGC ) 


To add the cell whose location is L@C to the LAVS and increment 


the LAVS COUNT by one. Then the first 4 fields of the cell are 


set to zero, 
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ees expense , accounts are wormally « elaseitie? only on 
one dimension and ‘frequent: attempts. te {acorperate further break-downs 
are evident in many existing account ing’ speteinss “Xn- setting up! asystem 
here I have attempted to classify income: and.expepse, items en, the, basis 
of four dimensions -- object, purpose, cost center and time. The 
classification on any one dimension must consist of a set of mutually 
exclusive and callectively exhaustive elements (er as neartly’tdé asi 
possible)... “a Be ely mt GERD of croddseel caetw [fso cits 

Generally, we would like to get informat ion as to what has 
happened so far this uct; a coupar lean of deta collected i in ‘past 
months, cumulative figures for the peried frem the first<6¥°the - 
fiscal year to the present, and comparisons Between biddget and actual, 
-.and also a framework within which the budgets fer future time perilodg can 
prepared. 

There is one problem which sometimes arises -~ how te handle 
transactions which affect the Inceme Statements ef past periods, If 
we get one that affects future time pervieds then ne preblem arises 
because the item is merely held on the Balance Sheet as a prepaid expense 
er income received in advance until such time as the affected time 
period is arrived at. In the present system this entry affecting a 
past period becomes easy to deal with. Since all past recerds are 
retained in secondary storage (on simulated tape files) the affected 
file can be read into memorys updated and then saved again. This would 
also require that the Balance Sheet data for all periods from then until 
now be all correspondingly updated. Although this could be done automatic- 
ally, it is not done within the present system. A similar problem to 
this one is what to do with items which are large and non-recurring? 
It is undesirable to put them into the regular classification since 
they would tend te distort the true picture. This problem has also 
not been dealt with in the present system. 

On the Object dimension the main question te be asked in setting 


up the code of accounts is: What commedity or service is received or 
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given in the transaction? In traditional accounting codes this dimension 
probably ‘has thé geéatdst tafluencée. -Bewever, we -wittzoftensdeval: ~ 
_ division made on‘ the’ bast of purposd! ehreugh*theséeftnition of :two-or 
more'object 'classes. By clearly defining a system ofoclasstfigation | 
on the basis of two dimensions instead of just one it is possible to 
arrive at a concise set of codes that can lead to more meaningful reports. 
On the Purpose dimension we can ask such questions as: Why or for 
what purpose is the money spent? or What do we hope to accomplish? This, 
I suggest, is the most difficelt of the dimensions to classify. 
On the third dimension we divide up the income and expenses 


according to a Cost or Profit Center by asking Who is responsible? or 


who should be charged? or perhaps Where or what should be charged? 

This is probably the easiest dimension on which to break transactions 

- down into classes which are mutually exclusive and collectively exhaustive. 
It can be done on the basis of geographical location, departments, pro- 
ducts, persons in charge, or functions (the later may overlap with 
purpose).. 

The last dimension is that ef Time -- to include the transaction 
in the time period in which the benefit was derived. This is not always 
a clear cut decision but it is one that must be made. As suggested 
earlier, this is probably the first dimension that will break-down 
with the use of time-sharing systems. We weuld then ask: Is there 
another way to represent the dynamic, continuous nature of income and 
expenditures? On this dimension information would be stored in an 
expenentional manner. In other words, as we move back in time, the 
level of aggregation across this dimension would increase. 

Within the present system I have eliminated the Cost Center 
dimension since it is the easiest to define and also, in the light of my 
personal income and expenses I am the only one responsible and, hence, 
the only cost center. The object and purpose dimensions are included 
in the array which is defined within the system. The time dimension 
is achieved by storing information relating to other time periods in 
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a file kept in secondary storage. This does not impose any great 
restrictions since generally, only one time: period will be dealt with 


at any one time. 
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Operation of the ae 20a onecre besstaeo medaye ed. + TASKS WOU 


. Pointers ge ete “Parameter Lists 
“bY om : Set a = 


Note that execution of the 2 KOR. mast~be. Started on line 01 in order 
to set up the index in SAT for the frensEérgperators,, A13-and_14).-----y 


A more flexible schené- ete one Gsed within the K@P list 
would be as follows: - i 


a K@P read in 


a 
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FLOW CHART - the system centered around §P22. ,,,: 
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INPUT TRANSACTIONS", 


a Make entry 
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Bits] , 

‘9P25 prints our NN Lines of: ths: KPPy: EPR, aah DPR lists statting at 
lime’ S8.°> I£-SS: Le warlte et: then! it: da aseumeth to: be! Iyer) Di. (his is 
a duplication of @PLO' waich I was het preme to wse.): 88 eos itee 

ae 

‘ wees agdmug Sdueoss. oda 25 LY atgilw 
This: GP: is weed! to'delete account TJi fren the List array: +~ both 
the.cell representing-the-eccouht add* alli the celie mleing: upid ta! sub- 
siddary iter. All deleted. cells ard returted: téuthe: LAVEL OA wating: 
i@-tsowed if an attempt is? mate’ to: delete awh! adeovht cel lb which: hesai 
sublist and the user is given the epridn of! deletiagi it: br mote. os J 


tadmour 88 ods awig op beds: 


Se POT ciiw QPBlecs besw sb gids doew wettA 
‘. This OP ie used to write a file: constet ing of: the current: stetys: of ; 
the Balance Sheet (BS) Accounts, or the Income and Expense (P&}: Accounts, SES 
or the: Subsidiary: Liet a? (18)! o& ald threes) Thes waew ie) required! to supply 
tape numbers: foro the €iles end is expéeetedte keépibis: own record! af 411 
-the! numbere- ae edss- This asian teackinn Leben: thetiaheutd hrentuslly 
be oe to the! wsyastemi.: 9°20 2 code Lf Seussue ce. ei yiine one 
ae Fe, i bhoghoag fog fo Tivitow U2 Wena 
Fee $P32. rauom ab wtigs ad5 U7 .Ftol oe 
$P32 is used to read ima file ptéMowdly'cregtedoby @PS1.: i 
user ie asked’ to: supply: the tape'number:¢e@ be usedi! c20ifbedoo ant at 


. 
; ae fi ees fae pe PE BA 5 pee wee nee 
woe? ellis aha. Ge Pw Ate fof Pie. 


9P35 
This @P closes out all the  Tusdfie and aoiege Accounts to Account 
39, NetsWerth,., 9.26.0 20 (ete ods ot sifes fis wsnopsas TY « 


gP40 
@P40 is used to print out the.éurrent balance of account IJK. For 
Balahce Sheet Accounts theiK may. be'omicted sinéé theyzadl-coasitt of . 
only two digits.!: Fer: income‘ and Expense accoudts): if) Ko=20 (dr? blank}, oo 
the total balance over all purposes will be printed. This @P will 
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repeatedly ask for an account number until a oe retmen! ta 202 
givens ° °° Dluue aeheown gai oveeobe add of soratbus luteuu yiov A 


Hei PR PaQG Lars Spore e@donepd soylaes bes wviboOur .ge ist ad yolibost 
Adin iba lf vibetes fara od LO GRBYSO Leak dope ft4 og Mens toah 
O@POl will: priwet: out: 4 Trial Batenee ef a24 ees acedint ss Phées-: 
ee ik abet Yo previde ene date co be! prihted on the! stavément 1 Thi 
qk phetter® Function shee bhowde! eventest 1yobes ded egated? too the’ ef skew 
ed! that RO ubdt eed! eater: dhe’ date only’! oneer? Et? would: thea! wecetered 
. tie gothe® ComMSH Lowat ion Ge! That” Lt’ eoeldu be: referenced! by. ze other PBs. 


ope ee on x A nay hou : rile Ey 
od olf rgecr of bhacw tio majayve: graesta s113 of qetenstze ne dona cris 


Gaby So eG: eq .8368> To esc owt Guu sTLames 
+ NR 8° BR W149 peane> et! Ee? Taceihe® ARM Zkpenee! Statement io Fheusey is 
ASKER’ 40° RUpPly" PhIEM pare ct! wA11 He Beads! LEV al Ol peepede'ts2 entered, 
a inoue phd ee puckeseh ee PIRSA? QOUfoG. OF astdrysg Dire 
Sas ee Addi u Shy $iboey. sth mse Moods by paymsil td sasescg 


o 


9P43 22065368 
@P43 will print out the subsidiery lista of a series of Balance 
Sheet Accounts, if they have subsidiary lists (up to ten accounts). 


GP44 
This @P will print the Balance Sheet. It will net out the balance of 
all Income and Expense accounts to arrive at a figure for Net Income. This 
amount is then included in the Balance Sheet if it is non-zero. 
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For the Rutuye : 2 3,8f4 deo & EFe ag (O09iG THRGROE Ab yO) WAS Yibe ssg-7 
A very useful addition to the accounting system would be the, ...;. 
facility to set up, modify, and analyze budgets. Any of the operations 
defined so far which use actual dat@: gould be used equally as well with 
budget,jdata,:, When. ashudget is prepared dt. would. gimply, be: filedidn its 
cuxrent status, just ag files.of.date are, created: now, One, major; change 
would have,to. be, mede. to, aljoy; a. compesisomoas budget. dete to. actual data: 
two: complete: sets of) accoups,. balances: in. she, memory. o8 the, computer, at. 
the same ting... This .wevld, require. an: expansion af: the, commen data base. 
With such an extension te the present system it would be possible to 
compare the two sets of data, be it,.¢ydget versus actual or one month 
versus: anothers, 6nd: ieee, xepext sen she, diffesenaes. betveomaccqunt s. 
.'» . Another. pogedblilgy: forthe future, is. ag extensagn, of. xeceivables 
and payables to include suffiedeag iaformetion, $9: allow. us,to,, age: them, 
prepare billings, and check on the credit ratings or limits on certain 


accounts. 
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Chapter XI 


This empty page was substituted for a 
blank page tn the original document. 
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To use CALOP1 in the OPS-1 system, one merely types in LOADGO MAINOP 
READOP CALOP1. (Any special subroutines. used. by the OP's should be 
loaded in between READOP and CALOP1.) From here on, one proceeds to use 
the OPS-1 system as described earlier. Unbeknownst to the user, here is 
what CALOP1 is gad — i eth ——w of: the \desiged OP and loads 


thn, ,, ibe 1 transfers to 


site a oe 


the OP it has just teadad: aeeen: the OP is through’ executing, it is 


deleted from, memory. (ajthoyth Fhe user is given no indication of this), and 
control passes back to the program that originally called CALLOP. The 

user continues in this manner. Except for the computer typing out EXECUTION, 
he would have no a priori knowledge that all the OP subprograms had: abt 


, been, previously. loaded . Ante, MEMOTY +. Should. he, Biv, either. FALORL or 
,CALOP2 an. i1legal QP number (of an OP that does not exist in BSS. { form on 


L. 


LOW 


his. files), an, error, megsage is printed, ou ut. and sontrol . Just passes. back 


Le 


| £0 $he. program that. called CALLOP, neaMerg vaste eg in Vis 


CALOP2 is similar in: nature to CALOP]: bat- de: just: a bit more: re 
ticated. The loading of the main programe: is- simiiar .: > However ;: the’: 


_. compuber then types EXECUTION three times, which, indicates. phat, £wo 
_: Programe, have been Jogded, FIRST(. (FAP) and READR, (FORTRAN)... which ar¢ 
Loply used once apd then deleted. FIRST( agke for Fyo paremebers, (READR 


is used to read the parameters, £¥om. fhe, consoles). which, Abovld. -be, of Fhe 
form .XXXXX (each--trailing zeros can be deleted). When that fraction 


(indicated by the initial parameter) of memory tas-been used-up by the 


users a peceremt re ammounce that Facto by: prsheiay: CE TIME 


and, the amount Of menory the user hae weed (iB;ockal) and. seekng. bie, if 


-he would like to delete all of his subprograms (note*that/fuse .Q.° in 


place of ?). If he does, he should type in at least three characters 


da\ts\s eae B27 Hh 
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-é Added Note (by MaledlaiM. deriesyi i: 6 (TOK YE se S8Uc 10 22% 26 Coue) 


yayds oss 


PQ Raa T sagRd ih @ Saud. da 
It has not been possible to adapt GkLops es “the OS's system because of 


Coal’ ASMHO goduonss [Ply mat due atd stelsb o3 insw jon 
some undetected errors, perhaps’ i in ‘the BSS loader. 
(uidoempise ovidibbe ait vt betreolbei) soitosy? redtoqsn m3stten aisge 


inizq Phe, appa aes OF, CALOR A+; hegaver Aid yield some RAALiive 
Feeulte... oj ame, BRS Joader creates, a fable, cabled. MOULD) which contains, the 
igo ePes, ang, ie Y ReAnER, of; all, subroutines, Agased, into AAFe memory... 5 
CALOP2 scans, the, MOVIE), tebhe.ho, 39° ALA Ranbine AA, in cong: before poing 


to the alee. to find it. This use of the MOVIE) table has been eens 
theo en . "atin ler, Pe ae sumtier CAtte cattor, nels has worked ett, “ 

: gee eek? exten ng the use of the adtiey cx r Te tatov? Yt rts ‘coule e ‘ 
conbida ae abty’ sampiitied at Pa Ltet” which ¥E ea ox al arene! 


lisme 8 amnvagyadua ys Yogo a1aw reas aft tt sau o3 margexq tatisd 
memory elimi ted. 
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